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Atari Computer Enthusiasts (N.S.W) is an INSIDE INFO 
independent, non-profit computer users’ group loosely This is our bi-monthly users group magazine. 


at‘iliated with Atari Computer Enthusiasts in the U.S.A. 
While we are recognized by 7777227777772, as the 
Official Atari Users’ Group in N.S.W., we have no 
connections with thea or the ATARI Corporation, ur 
aims include promotion of the various ATARI Home 
Computer Systems, instructing both beginners and 
advanced users in programming techniques, exchanging 
public Gomain software, hints, tips and ideas amongst 
members and generally enjoying ourselves. 
The Ciub cannot condone sottware piracy, 

COMMITTEE MEMBERS 

Barry Williams (President) 

Tony Reeve (Vice President) 

Alex Kwok (Secretary/Treasurer: 

Jamie Athas (Meetings Organizer) 

Ken Shiu (Editor) 

Roberto Romano (Assistant Editor) 

Jet¢ Maddock (Bulletin Board) 

Peter Dickeson (Librarian) 

barry Francis (Software Exchange) 
Address mail to:- A.C.E, (N.S.W.) 

GPO Box 4514 
SYDNEY NSW 200! 

MEMBERSHIP FEES/RENEWALS 

$30 for the first year and $15 (Renewal Fee) 
thereafter (or $20 and $10 respectively for students 
under {8 and still at school), Overseas air-mail 
subscriptions are ${0(Austi extra per year, 

The number in the top right hand corner of your 
mailing label indicates the issue No. with which your 
subscription expires. You should renew immediately if 
the number is the same as the issue you receive, 
S.1.G6. -SPECIAL INTEREST GROUPS 

Phone a contacts or write to the Editor with 
your suggestions, high scores, reviews, hints or tips, 


Home Phone # 
(02)452 2229 


(02)661 3377 
(02) 349 7365 
(02)534 2120 
{02}327 4398 
(02)568 2990 
(02) 80 2505 
(02) 789 1397 























GROUP CONTACT Home Phone # 
ACTION!: Ken Scalley (02)624 4561 
ADVENTURES: Garry Francis (02) 789 1397 
ARCADE GAMES: Ken Shiu (02)534 2120 
FORTH: John Nattes (02) 94 5463 
HGRDWARE: Jamie Athas 102)349 7365 


MAGAZINE PROGRAMS: Garry Francis (02) 789 1397 
BULLETIN BOARD -Phone(02)568 2990 

Systems Operator (SYSOP) is Jeff Maddock. From 
January the system will be available between 9 P.M. and 
{2 P.N., Mondays to Saturdays only. Access requires a 
personal password which is available from SYSOP tor $3 
per year. We recommend you use “AMPLUSS.UDL” terminal 
software. PUBLIC DOMAIN SOFTWARE ONLY! 
ARTICLE/PROGRAM SUBMISSIONS 

Articles tor Inside Info should reach the editor as 
early as possible and at least ONE MONTH ahead of the 
release date. Ail programs or articles subaitted to the 
Club on disk should be in single density, DOS I] format. 
For every program you write and have accepted by the 
Software Exchange (or articles printed in INSIDE INFO) 
you will be entitled to one Software Exchange disk or 
tape at half price. 














BACK ISSUES: $2.50 each for issues in stock, 
out of stock. Nailing costs are extra. 
EXCHANGE SUBSCRIPTIONS: We are keen 
pagazines with other Atari Users’ Groups. 
COPYRIGHT: Unless noted as being copyrighted, peraission 
is given to reprint articles from INSIDE INFG, making 
acknowledgement of our source. Please send an extra 
copy of the issue of your magazine to A.C.E, (N.S.W.), 
ADVERTISING: Full page $50, Half page $30, Quarter page 
$20, Meabers’ personal adds are free, 

SOFTWARE EXCHANGE 

A full list of available titles has been printed in 
Inside Info #14 (December 1984). 

DISKS: $10 each. CASSETTES: $8 each. 

Non-members add 10%. Include an extra #1.50 to 
cover surface postage within Australia. 

Qverseas members should write for costs first. We 
are keen to exchange software with other user's groups. 
BLANK MEDIA: Prices are for lots of {0 and may change 
without notice. An extra $1.50 should be included to 
cover postage within Australia. Contact appropriate 
Software exchange for details. 

DISKS: $27 (SS0D Nashua -in plastic box) CASSETTES: $9 
DISK BOXES: $25 -hold 90 disks with lockable lid. 
Non-members price is $30. Add $3.35 for postage within 
N.S.W. and $5.50 elsewhere within Australia, 
REFERENCE LIBRARY 

Some books are brought to meetings, others are 
available only by arrangement with the librarian. Loans 
are made only to people researching articles or talks 
for the Club. 

MEMBER'S DISCOUNTS 
You may be asked to present your merbership card 
before being given any discounts! 
COMPUTERWAVE [5% -cash onlyJ:- 
325 George St, Sydney, (near Wynyard) Ph. (02) 29 163! 
THE COMPUTER SPOT (5% credit, 10% cash):- 
Shop C4, MLC Centre, Martin Place, Ph. (02}235 2971 
Eastgate Centre, Bondi Junction, Ph. (02)387 5208 
Shop 21A, Greenway Arcade, Parramatta. Ph. {02)635 6020 
COVER CARE (25% off computer dust covers] 
P,Q. Box 719, Chatswood, N.S.W. 2067, Ph, (02)498 563) 
MEETING DETAILS 

Meetings are held at 6.15 P.M. on the first Monday 
of the month or the second Monday if it clashes with a 
public (or Bank) holiday in the Amenities Room, 23rd 
Floor, MLC Building, Martin Place, Sydney. 

NOTE: You MUST sign in with the guard in the foyer, 
visitors sust be spoken for by a member and you can t¢ 
enter the building after 6.30 P.M, 
MEETING DATES FOR 1985 

*4th February = #4th March #ist April 

#6th May tird June Hist July 

#{2th August #2nd September #*14th October 

#4th November #2nd Deceaber 
* indicates release dates for INSIDE INFO. 
# indicates closing dates for article submissions, 


$4 each i¢ 





to exchange 
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During 1984 we have seen two committee members 
go overseas, but still managed to restucture our 
group so that in the future we will continue to aove 
ina direction which should suit every member or 
affiliated group of A.C.E. (N.S.W), 

PRESIDENT 

Tony Reeve (our former President) has moved to 
Arizona in the U.S.8. to continue his work for 
Honeywell. But when he returns later in the new year 
he will again take up a position on the committee of 
A.C.E, as Vice President. [It is my pleasant duty to 
wish Tony, his wife dane, and family a happy stay 
while in the U.S.A. -Well done Tony! 

Since Tony lett I’ve taken the reins as President and 
have been elected to that position for 1985, 
SECRETARY / TREASURER 

There was also our former Secretary/Treasurer, 
Tony Dinalio who decided that the Greek Islands 
looked very inviting and left sydney for an extended 
holiday, | would like to thank Tony for the way in 
which he carried out his duties as 
Secretary/Treasurer. J would also like to thank Alex 
Kwok who took over as the Club's Secretary/Treasurer 
for the remainder of the year and has done a fine 
job. Alex remains on as Secretary/Treasurer during 
1985, so wish him every success on the committee 
and good luck on keeping the Club “out of the red.” 
INSIDE INFO 

The committee has done a tremendous amount of 
work in many areas through the year and I's sure that 
you appreciate, as do{, the quality of articles 
which have been sent to our editor during the past 
year -did you benefit from then? Well our rising 
meabership should answer that question for you! To 
all members who have contributed articles and games, 
I would like to thank them on behalt of our 
committee, 

EDITOR 

At our 1983 Annual General 
Fitzgerald agreed(??) to stand in as (Temporary) 
Editor until a permanent one could be found. Our 
thanks go to Chris for getting Inside Info out single 
handedly -"Yee Gods", Chris won't be doing the job 
next year! Rather, Ken Shiu (pronounced “shoe") will 
be our Editor, Please show him your support and 
encouragement through the year. 

The Editor's job is being restructured so that 
the production of ‘Inside Info’ will involve an 
Editor and Assistant Editor, along with a number of 
Subies to handle overseas newsletters and local 
correspondence, Roberto Romano left his position as 
Bulletin Board Qperator to take on the job of 
Assistant Editor. 

BULLETIN BOARD SERVICE 

It is to Roberto that we owe our thanks for 
bringing the Bulletin Board Service on line ~another 
milestone {Kilo) in the history of ACE (NSW). 
Dutifully Roberto has manipulated the software to the 
point where our newly affiliated group, ‘Western 





Neeting Chris 


PRESIDENT 


PRESIDENTS ANNUAL REPORT 
From Barry Williams 
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Atari Users , will be using our software to operate 
their own bulletin board. Qur thanks to Roberto for 
the great work he has done! 

To our retiring Librarian Jeff Maddock, who not 
only has put a lot of time into our books, but has 
also always been keen to help out with school 
exhibitions, { wish to express thanks. Jeff is very 
versatile in that he is just as at home with programs 
as he is with hardware, so if you have a question 
please ring or put it to hia at the meetings, thanks 
Jeff. deff will now bein charge of the Bulletin 
Board Service from January 1985 (see information 
sheet for times), Programs are on line awaiting you 
members, so if you haven't yet bought a modem get out 
there and buy one! We will be endeavouring to 
upgrade the service and equipment so that a iarger 
fumber of programs will become available through the 
‘board’, If you want terminal software to control 
modems you should talk to Jeff. The club uses an 
‘Avtek’ modem designed and built in Australia, 
SOFTWARE EXCHANGE 

The Software Library is to be restructured with 
the Disk and Cassette exchanges being merged under 
the control of Garry Francis. During the past year 
Brian Simmons has managed as Disk Software Librarian 
with Peter Dickeson as Cassette Librarian, Together 
they have worked to keep the software library, 
formulate and categorise programs in difficult areas 
such as Education -but both having been teachers are 
well versed in this type of supervision, I would 
like to wish both of you all the best for the future. 
Peter Dickeson will be continuing his untiring 
support af the Club by running the Club's library. 
MEETINGS ORGANISER 

Since inception the Club's meetings have been 
co-ordinated by our ‘Neetings Organiser’, Peter 
Bamford, Peter has organised a constant flow of 
information and demonstrations to kept our meetings 
interesting and informative while keeping a tight 
rein on the controls. Peter has now retired as 
Meetings Organizer and we wish him all the best in 
the new year. The Ciub’s new meetings organizer is 
Jamie Athas. 

MONTHLY MEETINGS 

During the year the monthly meetings had a few 
changes of venue through the year, We would like to 
thank Computerwave for showing their support by 
providing their premises for cur meetings at the 
beginning of the year. We then returned to the 
premises of the ‘Overseas Teleconmunications 
Commission’ in Martin Place and as of the November 
meeting we started meeting in a larger room on the 
23rd floor of the MLC Building but are still using 
OTC premises -our thanks go to O7C's Chief 
Administrator and staff along one of our Club 
members, John Mattes, for allowing us the use of 
their establishment. Also, please note that visitors 
aust be accompanied by a member or else call for 
member in the foyer of the building, 
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FUTURETRONICS 

Once again we wish to express our appreciation 
to ‘Futuretronics’ for the loan of their equipsent 
for the Bulletin Board Service. During this year ne 
had discussions with Peter Carr (N.S.W. Manager) and 
David Blenmere (Sales Manager) and agreement was 
reached in a number of areas. Qne of these areas was 
to allow all other N.S.H. groups to be affiliated 
with A.C.€, (N.S.4.), Unfortunately all of this is 
now up in the air with the current situation of 
Futuretronics -see the Editorial elsewhere in this 
issue of Inside Info, 
SCHOOLS 

To schools and teachers in New South Wales the 
‘Atari 800 XL’ has been a wise choice as one of five 
computers selected for inclusion in the State 
Government schools contract. If our Club mailing 
list is any indication, many schools must be getting 
into the Atari, 





As you will have already noticed, this issue is 

a little larger than usual -read and enjoy! 
This 15 my last issue of Inside Info, I can’t say 
that it’s been an easy year for me, the magazine has 
taken up most of my time outside of working hours 
-I've had to put aside a lot of personal projects and 
my friends are wondering if I really do still exist! 
I’ve never really been very heavily committed to my 
Atari and I'm not really all that interested in the 
politics and history of the machine, but I've tried 
to do my best as a TEMPORARY Editor at keeping you 
informed. 

Personally, I consider that there are far more 
important things in lite ta commit yourself to and | 
feel that I should be the Atari's master -not it 
mine’ [1] be enjoying my free time and have plenty 
to keep me busy, it‘l] be great to be able to relax 
and not have to meet deadlines all the tine. 
Hopefully the new set-up of having two Editors will 
lighten the work-load and make the job a little 
easier. There are details on how you should submit 
articles on page 25 of this issue -please read then 
and do your best to write for you fellow Atarians. 

At this time I'd like to offer my thanks to 
those people who have helped by writing for Inside 
Info, especially to Ken Scalley for being a fairly 
consistent contributor by writing ‘DiSkussion’ and 
‘InterACTION!’. Ken, by the way, was the winner of 
the $100 prizemoney for the best article in Inside 
Info {issues 7 to 12) -good on ya Ken!! 

Well, if you've looked over the ‘Information 
Sheet’ on page 2 you're probably wondering what all 
the question marks are where there was once the name 
of Futuretraonics, Originally we found out that 
Futuretronics had closed their New South Bales office 
and left us to answer all their enquiries without 
even telling us -a great leap backwards when we were 
supposedly just recognized as the States’ official 


Epirorin. © 


While on the subject of schools, Bruce Fairhall 
(Principal of Blaney Public School) is organising a 
one day tutorial lecture to be held at Blaney on 
Saturday the 30th of March 30th 1985. Topics covered 
we be “Introduction to Basic’ and “Advanced Basic 
With Graphics for the Atari BOOXL". A four aan team 
will be on hand from A.C.E. (N.S.W.) to conduct the 
lectures and Workshop studies. $0 all you teachers, 
from BROKEN HILL to LITHGOW get in touch with Bruce, 

In foresight 1984 draws to a close and we all 
look forward to the future and all the goodies which 
it will bring to us. Qn behalf of the committee | 
would like to wish all the members and the industry 
as a whole, a very Merry Christmas and a prosperous 
New Year, 

*, yours in ‘Atari’ 
Barry Willians 
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users’ group. { should add here that the feelings 
I’m expressing are my own -I feel angry that they 
didn't tell us and had us answering alot of the 
enquiries that they should have been answering. 
Would you believe that one K-Mart store actually sent 
its stock order to the Club?!7!'?! [ haven't been too 
impressed by Futuretronics’ performance in the past 
but (silly me) I really believed they were going to 
turn over a new leaf. 

A few weeks after the New South Wales office 
closed we heard on the radio about Futuretronics 
being in the hands of receivers. From what we know, 
Futuretronics has some big bills to pay but all 
products will be available for Christnas, 

Once all bills are settled the company aay be 
taken over by a large public company like Myers or 
Coles. A week before the announcement was made the 
President of Atari was said to be visiting -but just 
who that was and why he was here is not known, 
perhaps Atari itself will move into Australia (hope, 
hope'). At any rate, ay understanding is that 
Futuretronics will probably remain but as part of a 
larger company and with a new name -certainly, | 
don't think the old name commands any respect. My 
experience is that they generally give you wrong 
answers, which is worse than no answer -I don't like 
wasting time on the wrong track! 

Anyway, we can only hope that we won't be 
treated as atf-handediy as we have been in the past. 
I'd reckon that we've given greater benefit, as a 
Club, to Futuretronics than they have ever given us 
-they seemed intent on making more work for us and 
let us support the Atari because they wouldn't! 

After making this scathing attack = on 
Futuretronics I'd like to take this opportunity to 
wish all of our members a HAPPY CHRISTMAS and a GREAT 
NEW YEAR, 

Chris Fitzgerald. 


Grubs 


by Sydney Brown. 


{Program reprinted from Eugene A.C.E. Newsletter, October 1982, 


Some years ago, a very original 
Space Panic appeared in the arcades. 
little man with a shovel 


you were represented by a 


who was constantly pursued by aliens. 
avoid the aliens by running around or climbing up and 
still, you could dig holes 

the aliens to fall into. 
ince an alien had fallen into a hole, you could come 
the head with your shovel, 
“r-cpe Panic did not take off like Space Invaders or 
va Mar, gut it did have a healthy following. 


down ladders. (Or better 
rn the brick walkways for 


back and bonk him on 


game called 
In Space Panic, 


How To Flay: 


You could 


Grubs will 





instructions!) 


























Around the same time, a game called Apple ranic 


was released by Broderbund for the Apple 
{In fact, it may have even been released before Space 
The aliens were replaced 
by apples and it proved to be a big hit amongst Apple 


Panic, but I'm not sure.) 


users, 


A year or two later, Apple Panic 
Now Atari owners could have a great 
the 
version 
implemented and wasn't a patch on the originals, 
Sydney Brown's Grubs is very Similar in concept 
and Apple fanic, but there are some 
example, the apples are 
can 


for the Atari, 
time bonking 
Unfortunately, 


apples = on 
the Atari 


to Space Panic 
important differences. For 
replaced by grubs, the grubs 





in a hole, 


I] Computer 


was translated 


head! 
was 


Yeah! 
poorly 


escape from the 


screen {which is exactly what you DON’T want thea to 


do} ard IT’S FREE! 


Article by Garry Francis. 


After going through the instructions and the 
score table, the first — 
see seven brick walkways at different levels with two 
ladders joining each 
random positions so that each game is different, 
come out from the top 
their way to the bottom of the screen by crawling 
along the walkways and down the ladders. 
is to get to the bottom level and escape. 
points every time a grub escapes. 
escaped, they create a community, 
over the earth, 


screen is drawn. You should 


level, The ladders are in 


levels and work 


Their aim 
You lose § 
Once 10 grubs have 

multiply and take 


(It's true! It says so in the 


Your job is to stop them escaping, 

You start at the bottom of tne screen and can 
move along the walkways 
joystick plugged into Port 1, 
into a grub, you will be zapped. 
lose one of your 4 lives and you get sent back to the 
bottom of the screen, 

The only way to kill the grubs 
You can dig a hole on any of 
walkways by pressing the fire button. If 
falls into a hole, you 
again pressing the fire button, 
0 ta 20 points depending on the 
the level, the more the points, so bury the orubs as 
early aS you Can, 
trapped for very long, 
it escapes, you lose 5 points. 

Incidentally, you 
yourself, 50 be careful, 
want to use it a5 a shortcut, 
the hole in by pressing the fire button, 

The game finishes when you've lost ali 
or when 10 grubs escape. 


or climb ladders by using a 
However, if vou run 
This causes you to 


is to bury them 
the brick 
a grub 
can return and bury him by 
This earns you from 

level, The higher 


However, a grub doesn’t stay 
If you don’t bury it before 
can fall through the holes 
This may be useful if you 
otherwise you can fill 


4 lives 


Good luck, You'll need it! 
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! REM ¢ GRUBS # 
2 REM # by Sydney Krown q 
3 REM 4 Heprinted trom # 
4 REM # Eugene 4.C.€, Newsletter # 
5 REM # Qetober 1982 # 
6 REM # Fublished by Atari Computer # 
7 REM 4 Enthusiasts (N.S.W.) 4 
8 REN # December 1964 4 
5 REM HRAPHHAHR HAR AEA EE RAH RETA DH TS HS 
{0 7 CHRE(125):DIM CCid) Dud) Add) Vv 


CUE) BCE) DULL SPOKE 710, f6sPOKE 709, 
14:POKE 792, 1 

{1 7 OR YB S's? "THE GRUBS 
ARE TRVING TO ESCAPE TO THE": 7? “SAFET 
Y OF THE SUBWAYS TO MULTIPLY AND" 

12 7 "TARE QVER THE EARTH. ":? “IT TARE 


5 4 
ae 


5 TEN GRUES TO MAKE A COMMUNITY", :? "S 
Q YOU MUST TRY 70 DESTROY THEM BEFORE” 


4 

13.7 "TEN ESCAPE.":? "YOU DESTROY THEM 
RY DIGGING A HOLE":? "TO TRAP THEM AN 
) THEN BURYING THEM, " 

14.7.3? "USE JOYSTICK 2 TO CONTROL THE 
MAN. ":? “YOU CAN CLIMB UP OR DOWN AL 
ADDER OR":? “JUMP DOWN THROUGH A HOLE. 
15 7 "PRESS THE RED BUTTON TO DIG OR B 
URY.":? "IF THERE 1S A HOLE HE WILL BU 
RY TF NOT":3? "THEN HE WILL DIG.” 

16 ? "THE GRUBS DON'T STAY TRAPPED FOR 
LONG":? "AND AN ESCAPED GRUB COSTS YO 
POINTS, " 

17 7 "WATCH OUT AS THEY CAN DESTROY YO 


5 


U TOO * 

18 7 sPOKE 53279,9 

19? "PRESS START BUTTON FOR SCORE TAB 
LE": 

20 IF PEEK(53279)5>6 THEN 20 

21 POKE 106,PEEK(1G6)~2 

22 GRAPHICS {7:POKE 712, 16:POKE 708,30 
SPOKE 709,140:POKE 710,198:7 #o;" 

GR UBS *sA=PEEK(106) #254 

23? #637 #63? #6;"GRUB ON TOP LEVEL 2 





a IND LEVEL 15 3RD LEVEL 
1 4TH LEVEL 8": 

24? #63" STH LEVEL 1 6 
TH LEVEL 0 TTH LEVEL 0°37 Hor 


7 #63" MISSING A TRAPPED" 
25.7 #63" GRUB LOSES 3 POINTS": ? #62? 


#6," you have 4 lives, * 
(Cay- 


fou FOR feo TG Si! 

{OL IF B>423 THEN READ D:FOKE A+B, D:NE 

XT B:GOTG 107 

{06 POKE Ath PEEK (57344+B) sNEXT B 

107 POSITION 4,203? #6:"PRESS start"sP 

$04 TF PEEK (S32791¢>6 THEN Lu9 

14) 7 #osCHRS(L25) PORE 710, {90s POKE 7 

UG A4sPOKE 7O9, 222: POKE 711, 142:POKE 7 

So, PEER(IG6) SPOKE 712,60 

(9) POSTTION oor? #6;"scared 
rxa" 


deadd 


suT 


{95 H29:Vez2;C=3Z:COLOR 249:PLOT WH, ViM 

BirFReG:Scsd:kD=0: INST 

199 N=isGOSUE 920:N=2:505UB 920: G05UB 

2000; SOUND 1,255,0.4 

208 STSSTICK Is TF ST=i4 AND V>1 THEN 

400 

202 TF ST=L AND V<23 THEN 410 

204 1F ST=#f1 AND How THEN 420 

206 IF ST=7 AND Hel? THEN 430 

Zio LOCATE HeV+l 2:1 7232 THEN GOSUB 
440 

220 TF STRIG(G)s0 THEN GOSUB 479 

230 NEN¢{s TF N52 THEN Nel 

231 GOSUR ove 

296 LOCATE HV 2Z:iF 2232 THEN COLOR 24 

SPLOT H,V 

299 GOTO 200 

S00 LOCATE H.V+i, ZsCOLOR 32:PLOT H,V:! 

F ZL190KZ=118 THEN 302 

301 VeVelsCOLOR 249:PLOT H,VsG0TO 204 
400 LOCATE H,V-1,Z:1F 22222 OR (2=32 A 
ND C8222) THEN COLOR CsPLOT H,V:V=V-t: 
COLOR 249:PLOT H,VsCeZ 

402 LOCATE H,V-i,Z:3F 28222 OR (2=32 A 

ND C2222) THEN COLOR C:PLOT H,V:V=V-1: 
COLOR 249: PLOT H,ViC=Z 

404 LOCATE H,V-1,Z:1F 2=222 OR (Z=32 4 
NO C=222) THEN COLOR C:PLOT H,VsV=V-1: 

COLOR 249:PLUT H,VC=Z 

408 TF 22118 OR Z=119 THEN 450 

409 GOTO 210 

410 LOCATE H,Vti,Z:1F 2=222 THEN COLOR 
CrPLOT Hy ¥eVeVtlsCOLOR 2493PLOT H,VsC 
={ 

412 LOCATE H,Vtl,ZsIF 2=222 THEN COLOR 
CrPLOT HViVEV+lsCOLOR 249: PLOT HVC 

=f 

4i4 LOCATE H,Vtl,Z:TF Z=222 THEN COLOR 
CrPLOT H,VeVeVelsCOLOR 249:PLOT H,VsC 
=] 

418 IF 72148 OR 22119 THEN 450 

419 GOTO 210 

420 LOCATE H-1,V¥,Z:1F 2=32 OR 7=222 TH 
EN COLOR C:PLOT H,VeH=H-{:COLOR 248:PL 

OT H,VsC=Z 

428 IF 72118 GR 22119 THEN 450 

429 GOTO 210 


| 
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430 LOCATE Hel,V,Z:1F 2232 OR 2=222 TH 

EN COLOR CsPLOT H,VsH=H#1:COLOR 250sPL 

OT H,ViC22 

438 IF 22118 OR 22119 THEN 450 

439 GOTO 210 

440 COLOR C:PLOT H,VsLOCATE H,\+3,2:IF 
14332 THEN 450 

442 VeV+3:COLOR 249:PLOT H,VsC=322RETU 

RN 

450 MEN+LsPOKE 712,14:FOR W100 TO 0 § 

TEP -5:SOUND 0,W,8,10:NEXT W:POKE 712, 

d 

451 FOR W=0 TO 100 STEP 5:SQUND 0,W,9, 
LO:NEXT WESQUND 0,0,0,0 

454 IF M4 THEN 460 

455 COLOR 32:PLOT M#+15,OsCOLOR C:PLOT 

H,VsC#323H=9:V=22:COLOR 250:PLOT H,V 

459 GOTO 200 

440 POSITION 5,233? #6; "tHe eNd":POKE 

53279, 0:S0UND 1,0,0,0:60SUB 2010 

4a IF PEEK(53279) (56 THEN 468 

469 POKE 77,0sPOSITION 0,0:7 #63CHRE(1 
25):6070 190 

470 IF HC OR HDG OR V>19 THEN RETURN 


471 LOCATE H,V,Z:IF 22249 THEN RETURN 

473 FOR WO TO 149 STEP 20:SQUND 0,14, 

GB INT(W/LO) NEXT WrSOUND 0,0,0,0 

478 JF 7=250 THEN 490 

479 IF 72248 THEN 480 

480 LOCATE H-1,V+2,¥:LOCATE H-1,V+l,Z: 
IF 2=32 THEN COLOR 85:PLOT H~{,V+lsRET 
URN 

461 IF 2285 THEN COLOR 32:PLOT H~i, V+! 
TRETURN 

482 IF (Z=118 OR Z=119) AND Y=32 THEN 
COLOR 85:PLOT H-1,V+l:G0TO S00 

483 RETURN 

490 LOCATE Hel, V+Z,Y:LOCATE H+i ,Vti,Z: 
IF 2=32 THEN COLOR 85:PLOT He! ,V+isRET 
URN 

491 TF Z=85 THEN COLOR S2:PLOT H+l ,V+i 
s RETURN 

492 IF (22418 OR 7=119) AND Y232 THEN 

COLOR S5:PLOT H+l V+i:G07T0 Sod 

493 RETURN 

S00 FOR WEL TO 2sLOCATE HiW) ,ViW) (Zr TF 
76>85 THEN NEXT # 

302 FOR WHE255 TO 100 STEP -10:S0UND 0 
MWA L4eNEXT WHEKDERD ed 

503 POSITION 14,03? #6;KD; 

504 N=Wi:GOSUB 920 

506 SOUND 0,0,0,0:B(W)=0sIF Vel THEN S 

C=SC+20 , 

307 IF ¥=4 THEN SC=SC+15 

508 IF V=7 THEN SC=SC+i0 

509 IF VEl0 THEN SC=SC+5 

S10 IF V=13 THEN SC=SC+i 

S17 POSITION 5,03? #63;" = “ssPOKE 77,06 
518 POSITION 5,02? #635C;" "ysIF SC<O 


b 


THEN POSITION 5,0:7 #6:"_"; 

519 RETURN 

600 LOCATE HIN) VIND41,Z:1F 2232 OR 7} 
220 THEN 610 

SOL IF (22448 GR Z=149) AND C(VIND=$)7 
JO>INTC(VIN)~1)/3)) THEN RETURN 

602 LOCATE HIN) +DiN) VIN) ,Z3COLOR CAN) 
tPLOT H(N) VON) SC(ND=Z:H(N) HCN} #D(N) 
603 IF (22118 OR Z=119) AND N=1 THEN C 
(1)=C(2) 

604 IF (22118 OR 22119) AND N©2 THEN ¢ 
i2)=C (1) 

605 [F DiN)=-1 THEN COLOR {18:1F HiN)« 
1 THEN D(N}=i 

606 IF DiN)=i THEN COLOR 119:1F HeNi >i 
8 THEN DIN)=-4 

607 PLOT HIN) ,VIN)SIF ViN)=22 AND GHIN 
20 OR H(NJ=19) THEN 646 

608 IF Z>230 THEN CIND=C:G0TO 450 

609 RETURN 

610 IF 7=32 THEN 620 

612 COLOR C(N)sPLOT HIN) VIN} SVN} =VIN 
PeLsC(ND=ZSCOLOR L18sPLOT HIN? V(Ni 
6i8 IF 2230 THEN CiN}=C:60T0 450 

619 RETURN 

620 BIN)=B(N)+1:SOUND O.14,8,B(NI STF & 
(N)>L THEN 625 

622 COLOR CIN) SPLOT HIN) WIND SVINDEV(N 
detsTF D(NDSL THEN COLOR 119:G0TO 624 
623 COLOR 118 

624 PLOT H{N) ,ViN) :RETURN 

625 TF (BIN) <14 AND KDCH1) OR (B(NDCB 
AND KD>10) THEN RETURN 

626 COLOR B5sPLOT HIN) VN) SV(ND=V(N) - 
{:1F DIN)=1 THEN COLOR 119:GQTG 628 
627 COLOR 118 

626 PLOT H(N) ,V(N)sBiN)=0:SC=SC-5: POS] 
TION 5,0:? #43SCs" "ssfF SCco THEN POS 
ITION 5,0:7 #43" "3 

639 SOUND 0,0,0,0:RETURN 

640 COLOR 32:PLOT HIN) ,V(NDEFREPREI IFO 
R Wei TO L5:SGUND 0, INT(RND(G) #100) , 10 
pLOSNEXT WSOUND 0,0,0,0:60SUB 920 

645 POSITION 18,23:? #6sFRisIF FRO? TH 
EN 440 

648 SC=SC-S:POSITION 5,0:.2 #65503" "33 
IF SC<O THEN POSITION 5,03? #6;*_"; 
649 RETURN 

900 FOR W=2 TO 20 STEP 3:POSITION O.f: 
> $63 "VUUUUUULUUUUUUUUUUUU" NEXT W 

901 POSITION 0,23:7 #6:°999)393232132) 
freed)"; 

909 RETURN 

910 FOR W=2 TO 20 STEP S:X=INT(RND(O)® 
B)+}:POSITION X,Ws? #6:"4":POSITION X, 
Weis? Hos "2" POSITION X,W+2s? #6342" 
911 NEXT Wi 

912 FOR WZ TO 20 STEP SsX=INT(RND(O)* 
B)+LOsPOSITION X,Wi? #O;"*"sPOSITION & 
Wels? #be"A"sPOSITION CHe2:? #6; "8" 


Cay~ 


913 NEXT W 

919 RETURN 

920 REINT(RND(O)#4+1):0N R GOTO 921,92 

2,923,924 

92) ViNd=1:G0TO 925 

922 VIN)=4:G0TO 925 

923 VINJ=7:GOTO 925 

924 VIN)210:G070 925 

925 TF N=t THEN H(L)=0:C0(1)232:B(1) 20s 

Dilyed 

926 IF N©Z THEN H(2)219:C(2)232:B(2) 20 

tD(2)e-1 

929 RETURN 

999 RETURN 

1000 DATA 191,191,0,253 
i 


253,0239,239, 
80,112, 168,81, 113,115,127 


14095 
27 62 


1010 DATA 10,14,21,142, 138,206,254, 124 
48,48, 16,240, 16,112,216,8 

1020 DATA 26,26,126,88,88, 28,22, 48,12, 
12,8,15,8,14,27,16 

1030 DATA 0,0,0,255,0,0,0,0,0,0,0,0,25 
5,0,0,0 

1040 DATA 255,255,255, 255,255, 255,255, 
255, 129,255, 129,129, 129,255,129, 129,0, 
§,0,255,255,0,0,0 

1050 DATA 90,90,90, 114,77) 7747749090, 
77 

1100 DATA 60,53,47,45,40,35, 31,29 

1200 DATA 29,31,35,40,45,47,53,60,64,7 
2581 ,91,96,108, 121,128,144, 162,182,193 
217,243 

2000 RESTORE 1100:FOR TU! TO @:READ N 


OQ:SQUND O,NO,10,8:FOR Wel TO 20sNEXT W 
NEXT TU 

2007 SOUND 0,0,0,0:RETURN 

2010 RESTORE 1200:FOR TU=i TO 11:READ 
NO:SOUND 0,NO,10,8:POKE 712,NOsFOR We! 
TO 25:NEXT W 

2011 READ NO:SOUND 0,NO,£0,8:POKE 71°, 
NOSFOR Wet TO 12:NEXT WeNEXT TUs SOUND 


0,0,0,0 

2012 FOR W=1 TO 84:NEXT WiFOR W=! TO 3 
SOUND 0,243,10,8:FOR WW=l TO {OsNEXT 
WH:SOUND 0,0,0,0 


2013 NEXT W 
2019 POKE 7{2,0:SOUND 0,0,0,0:RETURN 





KR EEEEESE BOOK REVIEW t#ewewwwcwce 


DESIGNS FROM YOUR MIND WITH ATARI GRAPHICS 
by Tom Rowley. Published by Prentice-Hall, R.R.P. $23.95 


Reviewed by Ken Hambly. 


This book is for the Atari 400/800 and takes the 
novice into the wondrous world of computer graphics, 
It is a tutorial that takes the user step by step 
into that world with every step being demonstrated in 
a Simple program. Explanations are provided for each 
new BASIC term encountered. 

To ensure that the user understands each 
unfolding marvel, questions are posed -allowing you 
to test yourself, e.g, "What statement would you use 
to change the right margin to column 3?” 

Answers are written upsidedown at the foot of the 
page, thus elininating annoying page turning. 
(ANSWER: POKE 83,3) 

It is gratifying to find within the book, two 
whole chapters devoted to teaching the user sone of 
the real elements of "ART". So many other computer 
books presuppose a knowledge or are written by those 
with none, The use of colour " to express a variety 
of feelings” is explored. Perspective and depth is 
adequately explained ~drawing shapes using one or two 
vanishing points. Shading to portray depth is also 
examined. All of the 400/800 graphics odes are 
explained as well as the limitations of the CTIA chip 
aS compared with the newer GTIA chip, thus enabling 


(Mount Pritchard Public School, N.S.W.) 


the CTIA owner to still participate (although all 
Australian Ataris have the GTIA chip fitted). 

This book is divided inte two parts with the 
first part being an excellent tutorial for the 
novice. 

Part two is not so excellent. We are taken 
through custoa display lists, mixed aode screens and 
player missile graphics in a mere 80 or So pages -ali 
this when it took 100 pages to get to this point. 
Still, it's a taste of what can be achieved with you 
Atari. 

Frustration rears its ugly head again when 
memory addresses (PEEK and POKE) appear -particular 
uses are well explained, but the inquisitive novice 
is left wondering. 

An interesting feature of the book is that after 
each section a “Challenge” is presented. A prograr 
or program modification is asked for as away of 
testing that you have understood the book up to that 
point. Answers (program listings) for these are 
printed at the back of the book, 

XL owners are still waiting for a book called 
the G00XL/B00XL Tutorial. Designs from Your Mind 
might fill the graphics gap while we wait. 


Computer Terminologies 


These terms were first printed in the San Leandro Computer Club Magazine in May 1984, 


ANSI a hacker who can’t sit still. 
BATCH a ninor gripe. 

BUFFER a nude coaputer user, 
CURSOR a hacker who BATCHES a lot. 
DISK DRIVE an address in Carael, 
END USER prograamers who sit a lot, 


GIGABYTE a painful sting on the giga. 
INDUSTRY STANDARDS nonconforming 
guidelines, 

RAM where most of the bugs are kept. 
TERMINAL INTELLIGENCE tobe so 


smart it kills you. 


InreRAL TUT! 


by Ken Scalley. 


This magazine is really taking off!! Last 
aonth’s magazine talked about our President becoming 
our international correspondent, and now I receive a 
Jetter from Q5S ithe people who market ACTION!) 
saying (in parths- 

“Just read your wonderful ACTION! review in the 
August issue.,... I've enclosed a review copy of our 
new ACTION! TOOLKIT, Try it out... 

Ray Crocker, 
(Marketing Director) 
cc:Michael S,Peters 
Bill F,Wilkinson 
Mark M.Taketa =" 

Well, how about that,. this magazine is read 
everywhere. My thanks to Mr. Peters iby the way, can 
anyone tell me what “cc" means? ..] think it must be 
Latin, or some other old programming language .. like 
BASIC = {Before = ACTION! = -Slow Interpretive 
Code????792)), 

Well with all that T really must do two things.. 
1 Write a review of the review copy! 

2 Not say anything bad about it!! 

Anyhow, on with the review, The ACTION! TOOLKIT 

contains the following files:- 


ABS ACT] ALLOCATEACT) CHARTESTACT) CIRCLE ACT 
CONSOLE ACT] 10 ACT] JOVSTIX ACT) PMG ACT 
PRINTF ACT! REAL ACT] SORT ACT) TURTLE ACT 
GEN DEN] KALSCOPEDEM| MUSIC SCR} MUSIC DEM 
SNAILS DEM] WARP DEM! CIRCLE ONL) CIRCLE OM2 
SORT OMI | PNG Di] PMG DMZ] PRINTF DNi 
REAL = DML | TURTLE DM! 


and comes complete with 33 page instruction book. 

The routines on the disk perform the following 
functions: 
ABS ALT -return absolute value. 
ALLOCATEACT ~allow dimensioning of arrays whose 
lengths are determined at run time. (This is not 
really available in ACTION’, but can be “fudged’.) 
CHARTESTACT -test if lower case, upper case, etc. and 
conversion of characters. 
CIRCLE ACT -circle drawing routine {very fast, and 
does not use sine or cos). 
CONSOLE ACT <-debounces console keys, and allow 
automatic running of program branches if console 
keys pushed, 
10 ACT -DOS functions and burst 10 through C10. 
JOYSTIX ACT ~changes joystick values to better than 
those funny OS values, 
PMG ACT ~player/nissiles, 





gives left justify, and lots more. Works with hex 
cutput (library command doesn't!'), 

REAL —sCOACT ~allows use of floating point nusbers, 
SORT = ACT -quicksort routine. 

TURTLE ACT -a la LOGG. 

GEM DEM -deao arcade gane, 

KALSCOPEDEN -kaliedescope demo. 

MUSIC DEN -playable organ deao. 

SNAILS DEM -another gaae, 

WARP ODEN -advanced concept game. 


(Winston Hills, N.S.W.} 


Before you ail get too carried away with ail of 
this, I would like to have a bit of a gripe. When I 
bought ay ACTION! cartridge, { also bought a disk 
called the Programmers Aid Disk ..it seems to me that 
a large proportion of the above prograas were on the 
earlier disk. admittedly, the P.A.D, did not come 
with any documentation (unless you count a file on 
the disk called ‘README’ which had a obriet 
description of the prograss.) 

Certainly, the following were on the P.A.D.:- 


ALLOC ACT] CIRCLE ACT] 10 ACT PMB ACT 
PRINTF DOC] REAL ACT) TURTLE ACT GEM ACT 
SNAILS ACT] KALSCOPEACT 








although the printt routine has been improved (as 
might some of the others), 

So, while I think it i8 good value ($U530) and 
contains some really good routines, (the changes to 
the print? command, and the new SORT routine are 
great'i, I was disappointed. I think it should have 
been wore properly sold as an upgrade to the P.A.D.. 

That's about it. I guess [ succeeded in | 
(write a review), but failed in 2 ino bad comments, ) 
---no wore review copies! 


Having now got into the bad books, 1 will list 
sore known ACTION! bugs for fellow ACTION! users: - 
% r"Cfilename>* will NOT run compiled code from 
aonitor. 
*% compiling with a negative offset does NOT work (at 
all''), [notified this to O88 in desperation, as 
the manual is full of how great this is (and it would 
be too -if it worked!) They hope to have a patch for 
next cartridge. 
% w"Cfilename>” will NOT repeat on error if compiled 
fron disk (ggrrr'' ,.start to re-compile ....ggrrr) 
% the run tise package as supplied will not work 
(patched in OSS newsletter.) 
% printbde in run time will not work, I have 
patched this if anyone wants a copy. 
% printé will not work with hex and some strings 
(see TOOLKIT review), 


I also have some doubts about the following, but 
no real proof:- 
*% when a I0CB error occurs, such as 129 or 131, the 
name of the last opened I0CB is given, not the one 
Causing error. 
% Not really a bug, but an undocusented comaand:- 
«shift><controlo€ in the editor takes you to end of 
file. 
% If you are trying to access out of arrays, you 
might be interested to know that arrays dimensioned 
to less than 256 are coded "in line” in code. More 
than 254 are stored at end of the code, Exactly 256 
is in line -I think! 
That's all for this month! 
Ken Scalley 


From the Software Exchange 


from Brian Siasons, (Software Exchange) 


Fellow Atari Computer Enthusiasts, by the tise 
you read this my term of office will be over and due 
to ay present business comaitments someone else will 
be taking on the responsibilities of the Disk 
Software Exchange, 

I feel it appropriate at this tine to set down a 
few thoughts and also to thank everyone for their 
assistance and understanding during the past twelve 
months. I would especially like to thank the 
comtittee, they are truly a dedicated and hard 
working group. 

The software exchange has certainly grown during 
ay tera of office. When I took over the Exchange, 
there were just four disks:- 

GAMES 1, UTILITIES 1, INSIDE INFO Volume 1 and FORTH 

and the only written documentation was for FORTH! 
Now, a8 you will see else where in this issue there 
are seventeen disks in the Exchange:- 

GAMES 1, 2 and 3; UTILITIES £, 2 and 3; INSIDE INFO 
Volumes {, 2 and 3; FORTH; XL TRANSLATOR; EDUCATION 
t, 2, 3, 4, 5 and 4. 

J can claim credit for introducing ten of these disks 
into the Exchange and for providing the written 
documentation for all the software Exchange disks. 

Blank disk sales have continued to be a strong 
line in our club marketing structure. After selling 
our original supplies of disks the committee decided 


that we should try to provide better quality disks 
for the Exchange. After detailed investigation | was 
able to negotiate the purchase of 500 NASHUA SS SD 
{Single Sided, Single Density) disks. These disks 
were sold at just slightly sore than the previous 
ones ~$32 for ten disks ina plastic box. Because 
these disks sold well and disk prices seemed to fall, 
I was able to negotiate an even better price for our 
latest supply of 500 blank Disks, again from NASHUA, 
These we can now offer to club embers for $27 -and 
that's not bad for ten Single Sided, Double Density 
Disks in a smart new black plastic case, is it? 

Well all that sounds like I's terrific doesn’t 
it, but I do have an apology to make to some of you 
who have had to wait a little longer than you should 
for your orders! [do have ay excuses but J won't 
bother you with them now, other than to say sorry to 
those concerned and J really have been doing 
something these past twelve sonths, 

Finally, things are looking pretty good for 
ATARI computers -what with new quidance in the USA, 
the BOOXL on the N.S.W. School's Contract and new 
cheaper prices from Futuretronics, I think we will 
see our club grow even more and the new person on the 
Software Exchange will be very busy filling orders 
from all our past, present and future Enthusiasts. 
Bood luck to my successor and LONG LIVE ATARI, 








Here is the up to date list of software which is available through the Club‘s Software Exchange. Disks cost 
$10 each (DOS [1, single density format), are double density and are only guaranteed to format on one side. 


Cassettes are $8 each, All instructions are supplied. 


UTILITIES #1 

MASSACRE Allows you to selectively delete 
multiple files from a diskette, even if they're 
locked. Ideal for ‘cleaning up’ those old disks. 
MEMTEST A machine lanquage program used to test 
your ATARI’s Random Access Neaory. 
NUN, OBJ Provides the BASIC user with automatic 
generation of line numbers. 
MICROASN. B01 This is an assembler which can:- 

{) Input and assenble source code 

2) Save object code on tape 

3) Load object code from tape 

4) Execute the object program (USR) 

5) Cali the object program and pass a parameter 

4) Disassemble an object program to the screen. 
ASM (SYMBOLIC ASSEMBLER) This assembler is 
written in BASIC, is disk oriented and supports 
symbols and labels. 
PRINTNOP This ts the assembler source code for a 
parallel printer driver which utilizes the ATARI's 
joystick ports (Nos. 3 & 4), 
UTILITIES #2 
Choose the program you want to RUN using 














MENU, JOY 

a joystick. 
MENU Menu program with novel title page. 

Ld A quick menu. 

MENU. 2 A menu progras, 

SUPER, MEN Can alphabetise files, allows you to 
run programs and get a print out of the menu. 
BUBLSORT. ANT A fast sort routine. 








Titles marked with * are not available on cassette. 


SCRNPRNT. LST Duaps screen to printer. 

RENUMBER Can renuber by giving new starting 
nuaber and step (line number interval, 

BUILD2X, BAS A utility to AUTORUN any BASIC 
program using DOS I. 

BANERMAK. BAS Makes large banners of your typed 
input. 

DISKDIR Disk directory dump for 40 column printer 
(Prints in 2 coluans) or 80 columns printer (in 3 
columns). 














MASTRDIR Keeps a directory of all your disk 
files, 

PMMOVER Player missile mover subroutine demo. 
LEPRDEMG Character set demo subroutine. 

BANABANA, BAS Makes banners of any height or width 


out of any character or message. 


MISSILE Missile subroutine demo (4 player 
missiles), 

DISKCAT Disk cataloging program with menu 
options. 


EPSET Set dipswitches of Epson printer or Epson 
conpatible printers. 

SOUNDEFF. BAS Allows you to experiment with 
sounds, directs output to screen or printer. 
MULTICOLR, BAS Set up to 24 different colour bars 
across screen by experimenting with background, 
luminance and character luminance, You can then save 
the custom screen to disk or cassette. 

DLIST. BAS Display list demo (tutorial) using 
6R.0, 1, 2, 7 and 8 on the screen at the saae tise. 


Cay~ 


UTILITIES #3 





CITYSCRL A scrolling city skyline by Stan Ockers, 
HELISCRL As for CITYSCRL but with an added touch. 
HELLG A Tinydos. 


SOUNDS An easy to use sound effects generator. 
POIYCOPY f disk copying utility which allows you 
to select only specific programs and arrange thes in 
a specific order. 

NENUPLUS A very useful disk aenu. Allows creation 


of an AUTORUN.SYS, lock files, binary load and other 
features all from the menu. 


COLORS An easy way to find the most pleasant 
combination of background and text colours for your 
progran, 

BISKSORT Sorts disk titles alphabetically. 
Includes a menu function. 

PMHELPER, ¢ An easy to use player maker from Stan 
Ockers, 

CHEQUES You can use this to have your computer 


write your cheques for you. 
MEMMAP A memory map, Gives a visual graphic 
display of top of RAM, Screen RAM, ... 
GAMES #1 

TLLER, BA A game for Z people. The object is 
to blow up your opponent by firing an artillery shell 
while judging the angle of your gun and the amount of 
gun powder required. 
BLACKJACK Card gane played against the computer. 
BOING The object of this game 1s to bounce on a 
trampoline for the greatest number of times without 
falling off. 
APPLE CIDER You must protect your apples fron 
being squashed by the invading alien ship. 
DOGGIES A game of logic. You have to arrange in 
correct order, six little doggies in the least nuaber 
ot moves. 





GOBLIN Like PACMAN itm) but there's only one 
ghost. 
CLEWSO You assume the role of the famous 


inspector Closeau to solve a murder 
five suspects, 


case involving 


HANGMAN The traditional spelling game of ‘quess 
the word . 
CHICKEN Make the chicken cross the busy Highway 


without getting run over! 
LINES An addictive two player gase in which you 
to try to get your opponent to run into your line, 
the border or himself, 

GAMES #2 
DRAW. BAS Use a joystick and try to cover the 
screen in colour before time is up. The computer is 
working against you. You will be credited with 
percentage of screen you have covered with your 
colour. 


ANTWARS Try to wipe out the eggs betore they 
hatch. 
BATS Try to fly through a cave without hitting 


stalactites, stalagmites or poisonous insects. You 
can only use your fire button. A Stan Ockers game, 
oP Of How quickly can you get around the race 
track? Don't drop too much o11! 

ADVENTRE A siaple graphic and text adventure 
~joystick and keyboard. 


VOLTURES Vultures descend in waves while you try 
to wipe them out. Concentrate! 
LANDER Land on the planet with limited fuel and 


it 


don’t crash! 

ASSAULT. BAS You are the (Chief Gunnery Post 
Officer on planet KALA. Protect your food processing 
plants from marauding Alien craft, 

PLUSZERO Use a joystick to move the PLUS, 
score by trapping the ZERO! 

STELLAR Try to hit as many invaders as possible. 
You only have 75 shots per wave, Nake them count, 


You 








MISSILE! Protect your city from invading space 
craft. 

GAMES #3 
CANNIBAL Bet the missionaries and cannibals 





across the river in | canoe without getting eaten by 
the cannibals, 





DEPTHCHG Destroy the enemy subs with your depth 
charges. 

EGGSNTCH Snatch all the eggs from the ants nest 
before they hatch. 

LANDER? Try to land on the moon without crashing, 
STARBLST Blast away the enemy ships with your 
lasers, 


KONG Like the arcade game but written in BASIC, 
Climb ladders, jump barrels and bricks to rescue your 
fiancee. 
HURKLE Find ‘Hurkle’ on a grid. 
compass directions. 

*"ATARI figFORTH 1.485" 
The lanquage, "FORTH", available only on disk. 

*XL TRANSLATOR 

Several popular programs won't run on the new XL 
gachines. This disk has two operating systems (one 
per side) which will allow you to run virtually any 
existing software. 


You have to use 





Ready to run programs that featured in issues | 
to 6 of Inside Info, 
"INSIDE INFOQ VOLUME TWO" 
Ready to run programs as featured in issues 7 to 
{6 of Inside Info. This disk also contains the 
cartoons (by Allan R. Smyth) which were printed in 
Inside Info #12 (April 1984), 
"INSIDE INFOQ VOLUME THREE" 








Ready to run programs as featured in issues 1! 
to 14 of Inside Info. 
EDUCATION #1 
AMERICAS General knowledge test of North and 
South American Capital Cities. 
ASTRON, BAS Gbservational Astronomy based on 
formulas in practical Astronomy, It gives 


information on objects in the solar system or deep 
sky over a period of tine. 
BEGINTYP Touch typing drills. 
BUDGET. BAS Monthly household budget which can be 
used for simulation exercises, 
NATHPKG Is a maths package with several available 
routines:- {. Greatest Common Denominator, 

2. Prime Factors of Integers. 

3, Linear Interpolation. 

4, Quadratic Equations. 

5. Simultaneous Equations. 

6. Perautations and Combinations. 
A spelling drill program in which you 
enter your own words. The computer mixes them up, 
then flashes them on the screen for you to spell. If 
you make a mistake it gives you longer to look at the 


word, cay 


SPELLBEE 


MICROTAT. WP A simple Word Processor that allows 
you to enter TEXT, SAVE, CLOAD, DISK, LOAD, EDIT and 
PRINT, 

CAESARS. Sets up a Roman Numeral Digital Clock. 


You can adjust the hours, ginutes and seconds. 
DIVISION, BAS This is a Long-Division 


tutorial /drill at 4 different levels, 


MULTIPLY. BAS This is a long Multiplication 
tutorial/drill at 2 different levels. 

IMPFRACT. BAS Improper fractions to mixed 
numerals, 

EQUFRACT. BAS Equivalent fractions at 2 different 
levels, 


EDUCATION #2 
ELLIPSE Give the X and ¥ co-ordinates 
ellipse drawn for you. 
FUNCTION Enter a number 


the FUNCTION MACHINE. 


and see the 


and watch it go through 


MADLIE Input nouns, verbs ... and a story will be 
generated, 

MATH. PRO Timed math drill including = all 
operations. Has 7 levels and can print results to a 
printer (LIST program to find the print command}, 
NATH2 Areas of irregular spaces, farts of 


triangles, binomial probability, days of the week, 
metric conversions, 
MINUTE. NTH A timed math drill 


subtraction of 1, Z, or 3 digits. 


“addition and 


MORSE This is key-6 Hand Cipher, It enciphers 
plain text messages and deciphers cipher text 
messages, 
NUNLINE You can set your own line length and 
increment, 
POWERZ Calculate powers of 2, You select the 


power range from 5 to 325, 


SCRANE. 14 Unscramble the letters and correctly 
spell the word, 
SLIDE A mathematical game of chase and tag. 


(Note: one of 


the operations must be subtraction. 
E.6, 3+2-{) 





TOUCH 4 typing tutorial and drill, 
EDUCATION #3 

FLAGSA graphic quiz on some of the flags of the 

world, 

HANGQUOT Similar to hangman but you nave to guess 


words and whole quotations. Numbers and punctuation 


count’ he sure to use °* when the quotation is a 
question, 
NATHWARS Math drill. A problem appears on the 


screen and slowly descends. [¢ the answer is given 
In time, 6 missile is iaunched and explodes the 
problen, If not answered in time the problem will 
explade when it reaches the bottom and the correct 
answer is shown. This program is set up for addition 
but could easily be modified for other operations by 
changing lines 190, 250, 340, 350 and 340. 

MEMORY PRO A memory training game in whicn you 


repeat either letters, numbers, or a combination of 


both, Up to 18 repetitions per round, 

MULT Tutorial and drill on multiplication of 
Singie numbers. Six levels, 

NOUNS Select the item that is different from the 
others shawn, Uses joystick. 

ODDEVEN Select the item that is different troa 
the others shown. Uses joystick, 

PLURALS Select the item that is different from 


ff 


the others shown. Uses joystick. 
RENGAMES Try to guess an unknown number by using 
division. The computer will give you the remainder. 
Four levels. 
VERBS Select the item that 15 different from the 
others shown. Uses joystick. 

EDUCATION #4 
ALGEBRAL Elementary algebra drill that tests 
distributive axiom of multiplication and addition, 
ALGEBRAZ Algebra drill to determine the bi-nonial 
roots of simple polynomials, 
ATRAIN Animated spelling game K to 2. Use the 
joystick to move the train carriages loaded with 
letters under the grabber, fPush fire button to grab 
a letter and load it onto the truck. If the wrong 
letter is chosen it will be pushed off the loading 
ramp and back on it's carriage. Spell the word 
correctly and you'll hear "I've been working on the 
railroad." 
COUNTING 
Answer correctly and a spaceship 
screen, removes your answer and lands for 
visit, 
BEOUUTZ A geography quiz 
LWRCASE.GR2 A tutorial 
case letters in Graphics one and two. 
read input from the keyboard, and backspace 
and 2 are included. 








Addition or counting game for Yr | or Z, 
flies across the 
a friendly 


on using upper and lower 
Routines to 
in GR. 4 


MOOMIND A Mastermind style game but in this one 
the computer answers in cows and bulls. & test of 
logic. 

OLOMAC A counting and matching game for 


pre- -schoolers and early primary grades. 

SCRAMBLE. JK Unscramble the letters to spel] the 

word correctly. (Yré to adult), 

WORDTROU.LE A homonym word game that requires you 

to put the correct word in a sentence, 
EDUCATION #5 

ALGEDRIL Drilis and timed tests on four different 

types of algebra problens. 

AREAS. REV Will give the area or volume of a given 

shape when you give the dimensions, 

DICENATH Uses dice to set up arithmetic problems, 

Similar to dominoes but easier. 

DOMINOS Solve arithmetic problems based on the 

spots on the dominos. 

ESTINATI Estimation by visually assessing the 

size, number, and co-ordinate relationships between 

lines, shapes and dots, Answers must be exact 

iPrimary to adult). 

EXPANSIO Determine the value of each house’ of a 

number, then add them up to arrive at the original 

number. 

HANGMAN, REV 

words included, 

SCRPTURE A quiz that will test your knowledge of 

Hiblical events, places and persons. 

WORLDCAP A text quiz that asks you to name the 

capitals of the countries of the world. 
EDUCATION #6 

VOLCANO An adventure simulation dealing with the 

Mount St Helens eruption. 

MAGICSQU The classic Magic Square in two levels, 

sequential and summed in al] directions. 

OREGON A survival simulation based on the Oregon 


ae x 








An expanded hangman game with 310 








trail set in the 1800s. 


WildWest 


by Stan Ockers. 
{Program reprinted from Eugene A.C.E. Newsletter, April 1983. Article by Garry Francis, 


One of the very early coin-op games trom Atari 
was a game called Avalanche. The object of the game 
was to catch a whole lot of falling rocks with a 
“shield” that you moved backwards and forwards along 
the bottom of the screen with a paddle controller. 
The graphics were pretty horrible {colour was 
supplied by strips of cellophane glued over the black 
and white TV screen), but the game was very 
compulsive, 

A couple of years later, Activision released a 
gare called Kaboom for the Atari 2600. It had alaost 
the same play mechanics as Avalanche, but the 
graphics and animation were far superior. Come to 
think of it, they were superior to just about 
anything available on the 2600 at that time. Kaboom 
was a huge success and helped to establish Activision 
as one af the leading software producers for the 
2600, (Both Avalanche and Kaboom are now available 
for Atari computers from APX and Activision 
respectively.) 

Stan Ocker’s game called Wildwest was inspired 
by Kaboom, In fact, if you were to change the 
characters and the colours, you probably couldn't 
tell the difference! 

How To Play: 

Dynamite Dan races backwards and forwards across 
the top of the screen while dropping sticks of 
dynamite. Your job is to catch the sticks of 
dynamite in your sombrero before they reach the 
bottom and explode. You get 5 points for every stick 
you catch, There are 15. sticks on the easiest 





When you aiss a stick of dynapite, you go down a 
difficulty level and you lose one of your sombreros, 
You begin the game with 4 sombreros, but vou'll cet a 
bonus sombrero every 1000 points (up to a aaxiaua of 
9), The game finishes when you run out of sombreros. 
Suggested Modifications: 

This is a great game. J’ sure you'll enjoy it 
the way it is, but there are a number of changes you 
can make to make the game harder. I'm not very good 
at arcade games, but I was able to rack up well over 
100,000 points and 9 spare soabreros. While | was 
having a break to write this article, we had a 
thunderstora which zapped the power supply and the 
computer went haywire, so I lost the gase! 

The game works best with paddies, so | recommend 
that you use thea. However, if you're in the 
unfortunate position that you don’t own any paddles, 
then change the lines given in listing 2 and you can 
play Wildwest with a joystick, 

The values in the DATA statement in line 1060 
determine the delay in {/S0ths of a second between 
each stick of dynamite falling. There is one value 
for each of the nine difficulty levels. Increase the 
values to make it easier or decrease the values to 
wake it harder, but don’t go above 255 or below about 
5 





Siailarly, the values in line 1080 determine the 
nuaber of sticks that Dynamite Dan will drop in each 
level. These can be any value between i and 255, 

The number used for comparison with the randon 
number in line 250 determines how often Dangerous Dan 


difficulty level, 20 on the second, 25 on the third 
and sc on. I¢ you catch all the sticks, you go-an to 
the next level, but not until Oynasite Dan hes a 
rest. Press the fire button when you think he's had 
a long enough rest and the game will continue. You 
can also change the difficulty level yourself by 
pressing SELECT during the break. 


LISTING 1 ED 


O REM MGPRERRRRERAARERRRARHTHHHHHMHE 7190 DIF=isSCORESOsHATS=4:? CHRS(125):P | 03? INCR 

1 REM # WILDWEST - PADDLE VERSION # | OSITION 21,03? “dif score high"sPO} 270 IF PEEK(1740)=0 THEN 256 

2 REM 4 by Stan Ockers # [KE 1761, 100:POKE 1762, 100 280 SCORE=INCR:SOUND 1,0,0,0 

3 REM 4 Reprinted from # | 200 FOR J253248 TO S3251:POKE J,100:NE] 290 IF SCORESBONUS THEN BONUS=BONUS+10 
4 REM # Eugene A.C.E. Newsletter 4 | XT JsPOKE 1743,2:POKE 1766,200:POKE 17] OOsIF HATS<9 THEN HATS=HATS+!: Y=203 X=3 
3 REM 4 April 1993 # 1 457,40:GOSUB 1370: BONUS=1000 *HATS:GOSUB 840 

6 REM @ Published by Atari Computer # ] 210 Y=20:FOR X=3 TO HATS#3 STEP 3:G0SU j 300 IF PEEK(1768)<PEEK(1769) THEN GOSU 
7 REM # = Enthusiasts (N.S.W.) # |B B40:NEXT XsPOSITION 14,0? HIGHSA=U5 |B 730:G0T0 320 

@ REM # Decerber 1984 # | RUL556):POKE 559,46sPOKE 53277,3 310 DIFSDIFeis3F DIF>9 THEN DIFS9 

> REM PRPRRAMEAREREAS AS EARAHAAHEHEHHE 10220 TF PEEK(S3279)25 THEN DIF=DIF +i: 1F | 320 IF HATS=0 THEN 350 

140 GOSUB 450;GRAPHICS O:POKE 754,CSPA] DIF=10 THEN DIF=1 330 GOTO 220 

GE:GOSUB 410:GOSUB B40: GOSUB 1000:605U | 230 POSITION 2,0:? DIF:FOR J=i TO 100: [340 REM # game over routine * 

B L410:60SUB 1330 NEXT JsIF PTRIG(O)=1 THEN 220 350 POSITION 1,7:7 "#8 @ # #8 44 
150 7 “Press START to begin® 240 GOSUB 1370:POKE 1740,0:POKE 1781,0 44 69H OH 

160 IF FEEK(53279)<>4 THEN 140 +POKE 1768, 0sPOKE 77,0 360 POSITION 1,8:7 “# #4 9 #8 #4 # 
170 GOSUB Sd0:RESTORE 180:FOR J=704 TO] 250 IF RND(O)<O,O1"DIF THEN POKE 1780,] # #4 @¢ 4 # 
FAZ:READ APOKE J,AsNEXT J:Bk6=56 { 370 POSITION 1,95? "# 
{90 DATA 0.44,92,34,66,14,50,0,54 260 INCRESCORE+PEEK (1768) #5:POSITION 6] # # #8 G8 HOH OH" 


md 


changes direction. Increase the value to make hia 
change direction more often. 
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380 POSITION 1,10:7 "# #4 do a 44 
#4 #4 # HHR" 

390 POSITION 1,127 “# #4494 
44 Hed a HT 

400 POSITION 1,12:7 ° a4 a 44 
4 68) HR OH 

449 IF SCORESHIGH THEN HIGH=SCORE 

420 TF PEEK (S32797406 THEN 420 

430 GOTO 190 

449 REM # change character set # 

450 DIM MCS$i42):RESTORE 440:FOR J=t T 

O 42:READ ASMCSS$(d J)SCHRS(ADENEXT J 

4oy DATA 194,169,0, 133, 203,133,205, 169 

224,133, 204, 165, 106,56, 233,5, 133,106, 

24 

470 DATA 105,1,133,206,162,4,160,0,177 

203,145, 205, 200, 208, 249, 230,204, 230,2 

05,202,208, 242,96 

486 ASUSR (ADR (MCS$) is CSPAGESPEEK (104) + 

£:25=2546"CSPAGE 

49G RESTORE SO0:FOR J=CS+8 TO CS+63:RE 

AD A:POKE J,A:NEXT d:RETURN 

500 DATA 128,2,32,1,134,1,52,8 

SLO DATA 2,8,129,2,64,8,32,2 

20 DATA 32,130,12,28,20,20,20,20 

530 DATA 0,0,5,9,9,9,10, 10 

540 DATA 0,0,128, 128,126,128, 128,128 

350 DATA 10,10.10,143,143,138,170,0 

560 DATA 128,128,128,200, 200, 136,168,0 

570 REM * change display list # 

580 DL=PEEK (560) +250#PEER (561) sPOKE DL 

+3, 70:POKE DL+6,6:F0R J=DL+7 TO DL+28: 

POKE J.4sNEKT J 

590 RETURN 

600 REN * instructions * 

610 POKE 752, 8:POSITION 5,1:7 " 4 4 # 

WILDWEST # # #” 

620 POSITION 2,3:? “Dynamite Dan has i 

t in for you," 

630 7? “He drops lighted sticks from th 

e":? "top of the screen at rates which 


a 


44 


4 44 


640 ? "vary with the difficulty level, 
":? "Using paddle zero you move a somb 
rero” 

650 7 "to catch them before they reach 


the":? “bottom and explode. Each tim 
e you" 
660 ? "miss you lose a hat. Lose all 


hats":? “and the game is over.® 

670 23? "The difficulty level goes do 
wn on":? “each miss, increases with ea 
ch" . 
680 ? "sucesstul group, You may also 
change’:? “the difficulty level with t 
he SELECT” 

690 7 "key during breaks. You get ab 
onus*:? “hat every 1000 points. Use § 
TART to" 

700 2 "restart the game.":? :? "Inital 


ization takes {8 seconds.":? “INITIALI 
ZING" 

710 RETURN 

720 REN # explosion routine # 

730 X=0:J=0:COL=20 

740 IF PEEK(1664+X)=20 THEN 780 

750 P2PEEK(1724+X) +PEEK (1736+X) #256: P0 

KE P,dsPOKE Pel, 2:ded+tsIF J=4 THEN J= 

0 

760 FOR K=0 TO 2:SOUND J,S0+RND(0) #50, 

B,U3+KsNEXT KsPOKE 712, COL+8%X 

770 POKE F PEEK(I712+Xi:POKE P+i,O:FOR 
L=i TO 30#RND(0)sNEXT L 

780 WeX+LsIF X<42 THEN 740 

790 SOUND 6,0,0,0:SOUND 1,0,0,0:SOUND 

2,0,0,0:S0UND 3,0,0,0sPOKE 712,BK6 

BOO X#HATS#3:Y=20sPOSITION X,¥:? " "s 

POSITION X,¥ti:? " "sHATS=HATS-! 

O10 DIFSDIF-1:1F DIF=0 THEN DIF=1 

820 RETURN 

830 REM # print hat * 

840 POSITION X,¥:? “$X"sPOSITION X,Y! 
1? "8" SRETURN 

850 REN # PM graphics + 

B60 DIM X$( 1) sASADR(X$) sB=INT( (8-542) / 
LOQ4+L} #1024: DIM FECB-AtSL 1) DIM POSts 

28) 

870 DIM P1$(128) ,P2$(128) P36 (128) POK 

E 534279 ,8/256 

980 DIN CI$(AS)sRESTORE 890:FOR Jai 10 
LSsREAD AsCi$(J,J)=CHAS(A) NEXT J 

890 DATA 16,56, $86,124,0,40,0,40,16,19 

8,170,146, 130,68,68 

900 PO$( 1) =CHRS(G) sP0$ (128) =CHRS(0) PO 

$12) =FO$: P1S=P0$s P2$=PO$s P3S=P0$s POS (2 

6)=Ci$ 

910 DIM C2$(LL) RESTORE 920:FOR J=1 TO 
LisREAD AsC2$(0,J)SCHRS{A):NEXT J 

920 DATA 124,254, 254,124,56,16,0,0,0,1 

98,136 

930 P2$(30)=C2$ 

940 DIM C3S(S)sRESTORE F50:FOR J=! TO 

GtREAD AsC3$(0 ,TP=CHRS(A) NEXT JsP3$(3 

4) =03$ 

950 DATA 170,184,170, 184,170,184 

960 DIM HS(9)RESTORE 970:FOR J=1 TO 9 
TREAD AsH$(0,J)=CHRS(A)SNEXT J: PS$(80) 

sH$:POKE 53257,1 

970 DATA 124,198,124, 124,56,56,56,96,4 

0 

980 RETURN 

990 REM # various strings # 

1000 DIM CSND$(iS):RESTORE 1020:FOR J= 
1 TO 15:READ As CSND$(J,0)=CHR$ (A) :NEXT 
J 

1010 ASADRICSNDS) sHI=INT(A/256) :LO=A-2 

So#HIsPOKE 1774,LO:POKE 1776,HI 

1020 DATA 30,142,1,25,140,1,20,138,1,! 

5,158,1,0,0,0 

1030 DIM DSPD$(9):RESTORE 1040:FOR J=1 


[fF 


TO 9:READ A: DSPD$(0,J)=CHRS (ADI NEXT J 
1040 DATA 3,5,4,4,4,3,3,2,2,2,1,1 
1050 DIM DDLY$(9):RESTORE 1060:FOR J=! 
TO 9sREAD As DDLY$(0,J)=CHR$(A):NEXT J 
1060 DATA 30,25,20,15,10,5,5,5,5 
1070 DIM CNTS(9):RESTORE 1080:FOR J=i 
TO 9:READ ASCNT$(J,J)=CHRS(A)SNEXT J 
1080 DATA 15,20,25,30,35,40,45, 56,55 
1090 RETURN 
{100 REM # create VBI string # 
L110 DIM VBIS(398) RESTORE 1120:FOR J= 
1 TO 398:READ As VBIS(I ,d)=CHRS (A) NEXT 
JsRETURN 
1120 DATA 173,234,6,240,57,206,236.4,1 
6552, 173,238, 6,133,208, 173,240,6,153,2 
09,172,242,6 
1130 DATA 177,208,240,21,141,0,216, 200 
977,208, 141,1,210,200,177,208, 141,236 
56,200,140, 242,6 
1140 DATA 208,14, 167,0,141,0,280, 441.1 
1210,141,234,6,141,242,6,216,173,224,6 
92403, 76,98, 228 
1$50 DATA 173,112,2,73,255 
1160 DATA 141,1,208, 141,226.46 
1170 DATA 173,225,6,24,109,227,6,205,2 
306,176.27, 205,231 ,6,144,22,141,225,6 
y144,0,208,141,2,208,141,5,208 
1180 DATA 173,244,6,240,13,169,0,141,2 
44,6 
1190 DATA 173,227 ,6,73,255,141,227,6,2 
06, 228,6,16,78,173,245,6, 205,233 ,6,176 
70,173, 229,6,141,228,6 
1200 DATA 162,11, 189,128,6,240,5,202,1 
6,248, 48,52 
1210 DATA 165,89, 157,200,6,165,68,24,! 
05,120,157, 188,6,144,3,254,200,6,173,2 
25,6, 157, 164,6,56,233,40 
1220 DATA 74,74,24,125,188,6,157,188,6 
1 144,3,254,200,6,169,1,157,128,6,141,2 
35,6,238,245,6 
1230 DATA 162,11, 189,128,6,240, 110,222 
3140,6,189,140,6, 16,102,189, 152,6,157, 
140,6,189,188,6,133,208,189,200,6 
1240 DATA 133,209, 189,176,6,160,0,145, 
208,165, 208,24, 105,40, 133,208, 157,188, 
6, 144,5,230,209, 254, 200,64 
1250 DATA 254,212,6,189,212,6,201, 11,1 
44,208,201 ,17,176,24,189,164,6.24,105,9 
1205, 226,6,144,13 
1260 DATA 56,233, 18,205,226,6,176,5,14 
4,30,24,144,165,189,212,6 
127) DATA 201,20,144,8,169,1,141,224,6 
124,144 42,177,208, 157,176,6 
1280 DATA 169,3,145, 208,24, 144,27, 169, 
1,144,234,6,169,0,157,128,6,157,212,6, 
157,176,6 
1290 DATA 238,232,6,173,232,6,205,233, 
6,476,209, 202, 16,196 
1300 DATA 169,0,141,2,210,141,3, 210,16 
2,141,189, 128,4,208,6,202,16,248,76,98, 


Cay” 


228 VBI-256*HI:POKE 1536, LOsPOKE 1540,HIIR] 1380 AMASC(DSPOS(DIF))1FOR Jeie7s TO | 
1310 DATA 165,20,41,1,£41,2,210,169,6, | ETURN S99:POKE J,ASNEXT J 

144,3.210, 24,144,235 1350 DATA 104,160,0,162,0,169,7,76,92, | 1390 A=ASC(DDLY$(DIF}) sPOKE 1764, A: POR 
1320 REN * insert VBI # 228 E 1765,A 

1330 RESTORE {350:FOR J=1536 TO {545:R | 1360 REM # init. page 6 values # 1400 AZASC(CNT#(DIF)):POKE 1769, A:POKE 
EAD AsPOKE J.AsNEXT J 1370 FOR J=1664 TO 1675:POKE J,O:NEXT | 1768,0, 

1340 VBI=ADR(VBI$) sHISINT(VBI/256) :LQ= | dsFOR J=1748 TO 1759sPOKE J,OsNEXT J | 1410 RETURN 





LISTING 2 
{ REM # WILDWEST - JOYSTICK VERSION # 7 ":? “Using joystick 0 you move a sombr | XT JsRETURN 
Z30 POSITIGN 2,027 DIF: FOR J=1 70 10] ero’ 1150 DATA 1462,0,173,120,2,41,4,208,2,1 
GINEXT JrIF STRIG(Q)=i THEN 220 1110 DIM VBIS(417):RESTORE 1120: FOR 9 62,252,173,120,2,41,8,208,2,162,3, 139, 


640 7 “vary with the difficulty level. | J=1 TO 417:READ AsVBIS(d ,J)=CHRS(A) SNE | 109,226,6 





Variable Lister 


by Grant Schumacher. 
{Reprinted from Adelaide Atari Computer Ciub Magazine, February 1984), 


Every time your Atari encounters a variable it 32760 REM Variable Nametable Display 
hasn't seen since the last power-up or NEW, CLOAD or 32761 T=O:GRAPHICS O:PRINT:FOR J=PEEK (130) +256% 
LOAD statement, it makes a note of that variable and PEEK(131) TO PEEK (132) +256*PEEK (133) ~1 
records if ina list known as the “Variable Name 32767 SF PEEK(J)<128 THEN PRINT CHRS(PEEK(Ji)5: 
Table" (WNT). BOTO 32764 

This short program can be appended to any other 32763 PRINT CHRS(PEEK (J))-128)3 L=t+1 
BASIC program {as long as the line numbers don’t 32764 FOR DLY=0 TO 9:NEXT DLY:NEXT Js PRINT 
overlap) and then accessed by typing (in immediate " VARTABLES IN USE*:END 


modei "GOTO 32760". All variables currently in the 
VNT will then be listed along with the total number 
of variables used {the Atari can hold up to 128 
variables in all), 

Arrays, no matter what size, will only count as 
ome variable and will be printed out as “A(" which 
would represent array "A". This program introduces 
three af its own variables -I, 7 and DLY, so if the 
VNT is eapty and this program is RUN, these will be 
the only three variables in the YNT. 





Congratulanions on that great computer setup, Terwilliger— 
which, by the way, has just replaced you. 


For SALE 














CASSETTE BASED PROGRAMS: European Countries and HREHE 
Capitals, Invitation to Programming 3 (sound and The Witness (disk) $35 
graphics), Blackjack, Space Invaders, Mystery Fun DISK BASED PROGRAMS: All $15 each, 
House (Scott Adams #7 Adventure). Softporn Adventure, Bandits, Threshold, Space Eggs, 
DISK BASED PROGRAMS: Zaxxon, Sky Blazer, Choplifter, Space Shuttle Adventure, 
Micro Painter, Castle Wolfenstein, Apple Panic. Fort All are original with full documentation. 
Apocalypse, Supergraphics. contact Paul Benjamin {Double Bayi on (02)32-0751. 
CARTRIDGES: Soccer, Dig Dug, @ix, Miner 2049’er, HEHEHE 
Juabo Jet Pilot. Gorf, Defender, Star Raiders, #50 Disk Drive in excellent condition $730 
Asteroids, Basketball, * ATeRT BASIC Faster and Better by Carl M. Evans. 

All are originals in as new condition, and have have 20 of these excellent books which teach sone 
documentation. Contact Lindsay Heron {Newcastle} on good BASIC tricks at $15 each, They are new books 
(049)58-1049, or leave a message on (049)52-5688 and normally sell for about $57.00. 
during business hours, contact Barry Williams on  (02)452-2229 (Frer 

HRKEE “areet), 
HHH 
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Christianity 


and the Computer 


ty Chris Fitzgerald. (Clyde, N.S.W.) 


As we move towards yet another Christaas season 
it seems an appropriate time for an article on how 
the computer aligns itself with Christianity. 1 know 
that @ost people reading this article will pooh-pooh 
it as a load of bunkum and possibly even feel 
offended that I included it in our club magazine and 
T ap well aware that no amount of arguing, discussion 
or whatever will sway anyone to believe in God or 
Christ -only when you are ready to accept it, will 
that happen! 

T would be the first to agree that the Christian 

Church has a lot of hypocrites in it, and I've left 
churches because [ wasn’t convinced that they were 
TRYING to live up to what they were preaching and 
supposedly believed! Rather, ! feel that such a 
church sins against God because it disagrees with 
Hie. The way I see it is that God has built His 
castle (creation) and anyone who doesn't like the way 
He wants to run it (except they aay try and still 
fail) is standing against Him -it follows that He can 
kick thea out! 
I also recognise that the church was never seant to 
be an organization, but a body of Christian 
believers, and that the church, as an organization is 
failing and has based many of its doctrines on human 
ideas and (in its earliest days) even accepted pagan 
practices . For example, Christaas (which as far as 
we know, was first celebrated on the 25th of December 
in 336 4.0.) had its date fixed by the Roman Eaperor 
Justinian because it tied in with a period of pagan 
celebrations which offered worship to the sun. 

Going a little further Christ was actually born 

around 7 B.C.! The aonk who fixed our ‘years’ in 533 
A.D. forgot to include the year zero and overlooked 
some short tise periods when he did his calculations. 
King Herod, the man who tried to kill the infant 
Christ actually died in 4 B.C. -obviously he couldn't 
try to kill Christ if he'd died before Christ was 
born! 
Further evidence suggests that Christ was not born in 
Deceaber -rather He would have been born some tise 
between March and Noveaber. These things are not 
really important, but they do serve te point out how 
gan can easily base his. customs on the wrong 
information, With all of this out of the way I can 
now get on with it. 

As a Christian, although I'm a long way from a 
perfect example, I have been aware of possible 
conflicts arising with Christianity because of aan's 
use of computers, There are two areas I can think of 
where computers could have a strong influence over 
what is stated in the Bible. 

Babel 

"At first, the people of the whole world had 
only one language and used the same words, As they 
wandered about in the East, they came to a plain in 
Babylonia and settled there. They said to one 
another, "Come on! Let’s sake bricks and bake thea 
hard." So they had bricks to build with and tar to 
hold thee together. They said, "Now let’s build a 
city with a tower that reaches the sky, so that we 
Can make a name for ourselves and not be scatteres 
all over the earth.” 


Then the Lord came down to see the city and the 
tower which those men had built, and He said, “Now 
then, these are all one people and they speak one 
language; this is just the beginning of what they are 
going to do. Soon they will be able to do anything 
they want! Let us go down and mix up their language 
so that they will not understand one another." So 
the Lord scattered them all over the earth, and they 
Stopped building the city, The city was called 
Babylon, because there the Lord aixed up the language 
of all the people, and from there He scattered thes 
all over the earth." 

The section you have just read was fros the 
Bible’s book of Genesis chapter 11, verses 1! to 9, 
As you may have realised, Babel is where we get our 
word ‘babble’ froa, and for obvious reasons babble 
seans to speak incoherently. 

Where do computers come into this you say? 
Well, technology is working all the tise for the 
advancement of, and to overcome the probleas of aan 
strangely though, often when we take a step forward 
we put mankind at greater risk (pollution and threat 
of nuclear war for exaaples). 

Today we are gradually overcoming the problea of 
language barriers. So far we only have prograss 
which allow you to type in a word in one language and 
then see it displayed in another, but with the 
development of voice synthesis and voice recognition 
for coaputers it is surely only a matter of tine 
before a place like the United Nations will be able 
to sack all of its interpreters. 

This seems a Saall point, but as shown in the 
Bible quote above, God didn't like people trying to 
do just anything they wanted. As with any invention, 
the way man chooses to use his inventions will decide 
the outcose. 

WORLD CREDIT 

The next area that I am aware of coses from the 
Bible’s book of Revelations chapter 13 verses 15 to 
18:- 

“The second beast was allowed to breathe life 
into the isage of the first beast, so that the isage 
could talk and put to death all those who would not 
worship it. The beast forced ali the people, saall 
and great, rich and poor, slave and free, to have a 
mark placed on their right hands or on their 
foreheads. 

No one could buy or sell unless he had this 
mark, that is, the beast’s nase or the nuaber that 
stands for the naae, 

This calls for wisdon, Whoever is intelligent 
can work out the meaning of the number of the beast, 
because the number stands for a aan’s name, Its 
number is 466." ; 

Boy, and here I've been telling you ali the 
advantages of using credit cards for overseas 
aail-ordering! A lot of people even see the 
Bankcard's ‘b’ symbol as 464 because of the three 
colours used. Revelations was written between 90 and 
95 A.D. by a guy called John after seeing a series of 
visions of the end times (the last days of the world 
before the second coming of Christ). 
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1 don't intend to delve into the book of 
Revelations, I doubt that J could work it all] out in 
ay lifetine (maybe I'm not intelligent!) but suffice 
it to say that the book could be understood by the 
Christians of that time but that seaning is today 
clouded. 

We've all been aware of the incredible fight by 
banks to get our business recently -in two years 
we've all but dropped the use of bank books and 
converted to little plastic cards and we've been able 
to go to an automatic teller at virtually any tine 
and get our money which meant that weno longer 
needed to carry easily stolen cash on us. Now we're 
just reaching the stage where we don't even need to 
get to the automatic tellers, we can access our aoney 
at the point of transaction (EFT or Electronic Funds 
Transfer). 

Through all of this there appears to be only two 
things standing in the way of a ‘Safe’, cashless 
society: 

1 People still like to use money, apparently through 
a basic sistrust of cards which they subconsciously 
relate to credit cards, 

2 Although plastic cards are more convenient to use 
and less conspicuous than a fat wallet, if they are 
stolen they could be used to access more money than 
if you'd been robbed of cash, 

There are obvious solutions to these problemas 
and they certainly have a great many advantages over 
carrying cash or plastic cards. Firstly cash, 
cheques and even the iaportance of gold could be 
eliminated. Instead of money changing hands or being 
placed into your account you could be paid in credits 
-l understand that the system would be called SDR 
(Standard Drawer Rights). There are several good 
reasons for adopting a system like this, the syster 
would be world wide and hence overseas trade would no 
longer be affected by exchange rates, you eliminate 
the cost of printing money and your credits couldn't 
be stolen -you only maintain a credit balance (pity 
if your account gets lost or tampered with). 
Certainly anyone who has their pay placed directly 
into their account and uses EFT is doing a similar 
thing already, next year you'll even be able to 
operate your account from hone! 

Next, there is the need to get rid of plastic 
cards which can be lost or stolen -the obvious 
solution is to ‘tattoo’ a number on each person just 
as Hitler did with the Jews during the war. AS we 
have already seen, it takes no time toread the 
magnetic strip ona card and identify the account 
-you only need enter a secret PIN (Personal 
Identification Number), Or there is the bar code 
system on products which can be read almost instantly 
by a running a stylus across it. This then 
identifies a product to a store’s computer, which in 


turn itemizes and prices the product on the cash 
register. 

Already there is a system which is instant, 
invisible and painless. Currently it is being used 
to brand cattle and to ‘tag’ salmon as they swim! -it 
is a laser beam which destroys the skin pigment, but 
so finely that it can't be detected with the huaan 
eye, 

Obvious advantages are that the mark would be 
alaost iapossible to forge or steal -it would be like 
a fingerprint and eliminate the need for cards and 
PIN numbers, The mark would give instant computer 


identification and could even identify @ body which 
had been in an accident. Each time you made a 
transaction the computer would be able to keep track 
of where you are -imagine if the systen got into the 
‘wrong’ hands and they were looking for you, or if 
vou committed acrime against the state, you just 
sight have to go hungry. 





It would seem that the Bible, even though it’s 
almost two thousand years old, is pretty well 
informed and that perhaps the prophecies in it 
haven‘t all come to pass yet. Just watch out for the 
conveniences the banks start offering you next -you 
may get aore than you bargained for! 

Well, now that I've got you all paranoid, I'll 
sign off. Remember that Christaas isn't meant to be 
a tine of commercialism but a tise to remember what 
God tried to tell us through Christ. Be sure and 
have a happy and holy Christaas. 

Best Wishes, 
Chris Fitzgerald 
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Courting Crickets 


by Stan Ockers 


{Program reprinted from Eugene A.C.E. Newsletter, February 1983, 


Unlike the other games in this issue, Courting 
Crickets cannot be traced to a particular coin-op 
game, although it is a little similar to Frogger. 
How To Play: 

Clyde cricket lives at the bottom of a busy 
factory. The factory is fully automated and conveyor 
belts are used to transport goods backwards and 
forwards. At the top of the factory lives an 
attractive young female cricket named Cynthia. Clyde 
has fallen in love with Cynthia and brings her gifts, 
hoping to win her feeler in marriage. He must bring 
her flowers, perfume, candy, a necklace and finally a 
ring, but only one at a time, 

Your job is to guide Clyde on his perilous 
journey through the conveyor belts. This is done 
using a joystick in Port 1. Press the joystick up or 
down, then press the fire button for Clyde to jump in 
the required direction. But be careful, for if Clyde 
crashes into any of the objects on the conveyor 
belts, the superstructure of the factory or goes off 
the end ot a conveyor belt, then it's bye-bye Clyde, 


Article by Garry Francis.] 


If Clyde fails, he has 3 brothers willing to 
take over where he left off. There is also a jealous 
cricket who attempts tb thwart Clyde's efforts by 
dropping old boots, hammers, vases and flowerpots 
from the top of the factory. I any of these hit 
Clyde, then again it’s bye-bye Clyde. 

After helping Clyde to win Cynthia's feeler in 
marriage, you can start over again at a higher 
difficulty level by pressing SELECT. There are 7 
levels altogether, Level 1 is a piece of cake, 
whereas level 7 is almost impossible, 








CREM SOS RERtRHRHEH AOE HER RAREST REE AEE 
L REM # COURTING CRICKETS 4 

Z REM 4 by Stan Ockers 4 

3 REM 4 Reprinted from 4 

4 REM # Eugene A.C.E. Newsletter #4 

5 REM @ February 1983 4 

6 REM @ Published by Atari Computer # 

7 REM # =©Enthusiasts (N.S.W.) # 

8 REN 4 Decemper 1984 4 

FD REM MORHHRERHRA AAR AAA OTHE RHEE 

140 ? "INITIALIZING ...0." 

150 DIM DS(1) FSC CINT(ADR (DS) /2048) +1) 
#2048-ADR(D$)~-1) ,DD$ (1024) ,P0$(256) Pi 
$1256) ,P2$1256) ,P3$(258) 

160 DIM BLS(13) ,CRH(12) CRIS (12) ,CRFL$ 
(12) ,CRE2$ (12) CRNS (12) ,STKS(3Z) HTI$( 
12) ,HT2$(12) SND$(173) sHISADR (DDS) /256 
170 DIM GFI$(§5) ,GF2$(15) ,DRPS$ (13) ,CUR 
$112) COLORS (4) GF L$="HIXLMXPQXTUXKXK” 
3GF2$="JRANGXRSXVAXKZEX" 

180 REM ## Joystick Routine ## 

190 RESTORE 200:FOR J=1 TO 32:READ A:S 
TK$(d =CHRS (A) SNEXT JsSTKSADR(STKS) 

200 DATA 104,173,132,2,240, 12,173,207, 
6,240, 20, 169,0, 141,207 6,240, 13,173, 20 
7 4.208,8,173,120,2,41,3,141,207,6, 96 

210 REM #* Sound Data «# 

220 RESTORE 230:FOR Je! TO 173:READ A: 
SND$id J)=CHRS(Ad NEXT J 

230 DATA 9,60,3,70,3,80,3,90,3,100,3,1 
00,3,0,0, 168,10, 108, 10,108, 10,81,20,64 
10, 108,10, 108,10, 108, 10,81,20 

240 DATA 64,10,0,30,53, 10,85, 10,53, 10, 
96,10,53,10,96,10,53,10,91,20,102,10,1 
08,19, 106,10,85,20,72,10,108,16 

250 DATA 108,10, 108,10,85,20,72,10,0,5 


0,53, 15,47,5,53,10,60,10,64,10,72,10,8 
1,20,40,20,0,0 

260 DATA 121,40,91,30,91,10,91,80,121, 
40, 81,30,96,10,91,80,121,40,91,30,72,1 

0,60,40,72,30,91,10,91,40,96, 30 

270 DATA 91,10,81,86,0,0,243,40, 243,46 
9243, 10,243, 40, 204,40, 217,10,217,40 
280 DATA 243,10,243,40,255,10,243,60,0 
19,47,10,72,10,60,10,64,10,72,10,64,10 
160, 10,72,10,0,0 

290 HS=INT(ADR(SND$) #256) sPOKE 209,HS: 

LS=ADR (SND$) -HS#256:POKE 208,L5: SOUND 
3,0,0,9 

300 DIF=1 

Sid REM ## DD$ is Screen Data ++ 

320 DDS(1)="@°s DDS (448) ="@" 3 DDS (2) =DD$ 
DDS (449) =CHR$ (0) 2 DD$ (828) =CHRS (0) DDS 
(450) =0D$ (449) 

330 LINELSADR (DD$) +513: HL=INT (LINES /25 
S)sLLELINEL-HL#256:POKE 98,LL:PGKE 89, 
HL 

340 POKE 559,0:G05UB 1140:GOSUB 1330:6 
QSUB 1530 

350 GRAPHICS O:POKE 754, START/256:G0SU 
B 1380sPOKE 559,0:POKE 560,0:POKE 561, 
SPOKE 559,34:G0SUB 1710 

360 ASUSR(1670)sVERT=8:G0SUB 1780:POKE 
88,LL:POKE 89,HLsPOSITION 12,0:? DIF: 
BRO=0 

370 POKE 708, 48:POKE 709,254:POKE 710, 
Bé:POKE 711,44:POQKE 712,72:POSITION 16 
./:? " courting crickets ° 

380 POSITION 2,07 "dif level": RESTORE 
382:FOR J=1 TO 4:READ A:COLDRS(I,d)=C 
HRS(A)SNEXT J 

382 DATA 228,36.4,236 


| 


S90 ODS (643,652) =" VYV VV YX ANAXYY VV YANK 
XAXYVYVYYXXXXEYY YY Y" 

400 DDS (653,692) =" VYVYVVRAMAXYYYYYYAXK 
KAYVYYYYRXXANY YY YY" 

ALO DD$(693)="_":DD$(694) =CHRS (96) s DDS 
(695) ="XX_" DDS (698) =CHRS (96) + DD$ (599) 

="XX_"sDD$(702) =CHR$ (96) 

415 DD$(769)="abXXabkXabk" 

420 GN=0s WFLG=0: GIF T=0: DROP=0s 0D$ (552) 
|" XXKXAKAXKAAA RA 2s DDS (S92) = KAKA RANA 
XXX" 

430 POKE 1622, 15:DD$(712)=GF 1$: DD$ (798 
)=6F2$ 

440 POSITION 16,7:? “SELECT dif or FIR 

E":POKE 77,0 

450 IF STRIG(O)=0 THEN 450 

460 KEY=PEEK(53279) s1F STRIG(O)=0 THEN 
500 

470 IF KEYC>S THEN 440 

480 DIF=DIF+isIF DIF>7 THEN DIF=! 

490 POSITION 12,0:? DIF:GOSUB $780:607 
0 460 

300 POSITION 16,78? " COURTING CRICKET 
S ":G0SUB 1000: DD$(712)=" XX" 3 DD$1788)= 
tyye 

310 ASUSR (ADR (STKS) ) 

520 IF GIFT=1 AND YPOS*187 AND P>idd A 
ND P¢134 THEN GOSUB 820:605UB 790 

530 IF PEEK(1743)=0 THEN FLAG=0 

340 IF FLAG=1 THEN 580 

O50 S=PEEK(L743)s1F 5=2 OR S=i THEN FL 
AG=1sPOS(YPOS)=CRIS:POKE 53747, 170: Ok 
E 1591, 1:FOR Ja! TO 20:NEXT J 

560 IF S=2 AND VERT)O THEN POKE 1747+¥ 
ERT ,O:PO$(YPOS}=BL$s YPOS=YPOS~1 6: Pus (Y 
POS)=CR#:VERT=VERT-1:POKE i767+VERT, 


Cay” 


370 TF S=i @ND VERTC8 THEN PORE 1787+ 
ERT Os POS 1 YPOS) =BL$s YPOS=YPOS+ Lor POs 
POSISCRSSVERTEVERT+I SPOKE L7674VERT, 1 
580 PrPEER APPL is TF P9999 OR Pood THEN 
PORE (7o74VERT O:G0TO 710 

290 PORE 53278,0 

600 FOR 321 TO LOsNEXT J 

6i0 TF PEERVS3292)>0 THEN POKE 1747+VE 
RT ,O:G0T0 716 

626 TF 1hG5259 AND PS100 AND PC134 THE 
H POKE (7674VERT,O:GOT0 840 

eld JPOSSJPOS+DELU: IF JPOSRTLI OR JPO 
SeLLd THEN DELJ=-DELJ: JPOS=JP0S+2#DELJ 
540 PORE 53250, IPOS 

650 DRCNTSORCNT-i: TF DRCNT<{ THEN DRCN 
TehoeSa lO-DIFi:DPOS=30:GOSUe 990: P38) 
OPOS SORES: DROP=1:POKE 33251, JPOS 

sae TF ORGPs1 THEN PS$(DPOS)=8L$: DPOS= 
OPOStDEL TA P3S(DPOSI=DRPS: SOUND 1, DP05 
“40.10.40 

of) TF DPGS>240 THEN GOSUB 820: DPOS=50 
oao TF PEEK(52260)=9 THEN POKE 1767+VE 
PT, O:G0TO 716 

690 GOTO S10 

700 REM ## Faliing Cricket ## 

7id GOSUB 8270 

720 POS YPOS) =BL$: VPOS=yPOS+hs POS {YP OS 
reCRF $s S0UND 0, VFOS.10,103FOR Jet 10 
SO2NEXT g 

73G POS UVFOSDSBL Ss VPGS=YPOS+6s POS (POS 
r2CRF 2S: SOUND O,¥POS,10,i0sFOR Jet TO 
SOINEXT Gs TF ¥POS¢240 THEN 720 

740 SOUND 0,0,0,0 

750 BROBRO+i: TF BRO=4 THEN 1030 

760 Jade (BRO-1)sOD$ (693+) 69640) =" XXKK 
"SDDS(769+0 772d =" 4K" 

770 VERT=8:GOSUB L710:POKE 1791, £20:P0 
KE 1622, 15:60T0 S10 

780 REM ## Erase Next Gitt ## 

79G GIFT=OrGNSGN+1:G05UB 1000; DD$(7 12+ 
GNES)="KK"s ODF (7EB+GNES) =" XX" 

Bud RETURN 

AiO REM **# Eliminate Drop #* 

820 SOUND 1,0,0,0:P3$(DPOS)=BLS:POKE 5 
3251, 0: DROPS: RETURN 

830 REM #* Reached Ferale ## 

940 GOSUB G20:POKE 1791, 118 

850 IF GIFT=0 THEN BOSUB 920 

Bod IF WFLG=! THEN 1050 

870 FOR K=i TO iO:Pis¢yPOS-14) =HTI$ 
860 FOR J=15 TG 9 STEP -1:SQUND 0,20,1 
OQ DINEXT UsPl$crPOS-{4)=HT2$:FOR J=i 7 
QO L5:NEXT dsNEAT K 

B90 TF STRIG(O)=! THEN 890 

900 POS POS) =BLSsP 1S (YPOS-14) =BL$s5=1 
:60TO San 

Gi REM et Print Gift +#* 

920 GIFT=1;DD$ (552) GF 1$ (1, (GN+1) #3) 20 
DS (592) =GF2$(1,(GN+1) #3): 1F GN=4 THEN 
WFLG=i 


930 RETURN 

940 REM & Pick a Weapon ++ 

950 REINTIRND(G) #4) :RESTORE 960+104R:F 
OR J=1 TO (3:READ AsDRP$(d,J)=CHRSIA): 
NEXT J:POKE 707, ASC (COLORS (R+1)) 

952 RETURN 

960 DATA 20,72,34,20,74,40,8,127,127,6 
2,62,28,28 

970 DATA 0,0,80,112,112,112,112,112,12 
0,126,94,0,0 

980 DATA 0,0,48,96,64,127,127,44,224,2 
24,0,0,0 

990 DATA 60,24, 24,24, 60,126,223, 215,24 
7, 255,127,126, 66 

995 REM ## Pick Another Gift #* 

1000 POKE 1622, 155: POKE 707,92: POKE 33 
251, 424+12"GNSFOR Jai 10 5:P3$(205)=CU 
R$:FOR K=1 TO 30:NEXT k 

1010 P3$(205)=BL$sFOR K=1 TO 30:NEXT kK 
tNEXT J:RETURN 

1020 REM #* No More Brothers ++ 

1030 POKE 1622, 134:POKE 53277,0:FOR J= 
53261 TO 55264: POKE J,O:NEXT JsGRAPHIC 
S {8sPOSITION 4,3:7 #4: "Al1 Brothers” 
1040 POSITION 6,4:? #6;"are Gone” 

{050 POSITION 3,737 #6;"PRESS start TO 
"sPOSITION 5,8:7 #6;"try again” 

i060 IF PEEK(S3279)¢>6 THEN 1060 

1070 GOTO 350 

{030 REM #*# Marriage Takes Place ## 
1090 POKE 1622,93:FOR L=0 TG 6:FOR k=0 
TO 3sPOS=64el +f oeks ODS (POS+L =" XKKicd 
XXXNCURAXA"SNEXT KeNEXT L 

1160 FOR d= TO 1000:NEXT J 

1110 POKE 53277,0sFOR J=53261 TO 53264 
SPOKE J,O:NEXT J:GRAPHICS £8: POSITION 
3,38? #6:"And They Lived” 

1120 POSITION 1,437 #6;"Happily Ever A 
fter“:60TO 1050 

1130 REM # Change character set # 

1140 DIM ZZ$(32):RESTORE 1150sFOR f=! 
TO S2:READ AsZZ$(1)=CHRS(A)SNEXT I 
1150 DATA 104,104, 133,204,104, 133,203, 
104,133,206, 104,133,205, 162,4,160,0 
1160 DATA 177,203,145, 205,136,208,249, 
230, 204,230, 204, 202,208, 240,96 

1170 POKE 106,PEEK(106)-5s START= (PEEK ( 
108) +1) #256 

1180 A=USRCADR(Z7$) 57344, START) RESTO 
RE 1200:FOR T=START+S12 TO START+SO7:k 
EAD A:POKE I, AsNEXT I 

1190 RETURN 

1200 DATA 0,0,0,0,0,0,0,176,0,63,58,57 
109 ,63,65,170,0, 202, 172,108,172, 252,25 
2,470 

1210 DATA 0,255,170,85,170,255, 255,170 
10,54,33,18,33,255,85,170,0,191,239,25 
1,254, 255,255,170 

1220 DATA 0,255,215,215,215,190, 235,17 
0,0, 254,251,239, 191,255,255, 176,0,1,32 
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184,32,12,5,16 

1230 DATA 64,208,64,224, 184,224,192, 19 
2,116,28,3,0,0,0,0,0, 200,238,248, 192, 1 
92,192,192, 192 

1240 DATA 0,0,0,0,2,2,3,5,0,0,0,0,128, 
128,192,192, 13,55, 219,222,223,55,13,3 
1250 DATA 112,220, 247,247,247,226, 112, 
192,0,0,0,58, 234,234,233, 229,0,0,0,40, 
234,170, 154,86 

1260 DATA 233,233,57,58,58,14,14,13,86 
190,90, 104,104, 160,160, 128,0,3,12,48,1 
92,192,48,12 

1270 DATA 48,204,3,3,3,12,48,12,12.3,1 
2,48,14,2,2,0,3.3,5.82,02, 160, 160,128 
1280 DATA 9,0,0,0,0,0,0,0,233, (81,173, 
183,222,122,94,107,2,10,2.4,16,15.4,1. 
128,160, 128,16,4,4,16,64 

1290 DATA 0,0,3,15,15,204,63,15,0,0,0, 

207,204, 255,255, 195,0,0,240,48,48,48,2 
40,240 

1300 DATA 0,0,84,5,17,5,1,5.0,0.21,89, 
68, 80,64 ,80,17,65,1,4,4,20,0,6 

1310 DATA 68,65,64,16,16,26,0,0,40, 190 
179,176,176,94,11.62,80,244,52,52, 52,2 

08 ,64,0 

1320 REM #* VBI Routine ## 

1330 DIM VBIS(75):RESTORE {340:FOR J=1 
TO 7S:READ AsVBI$(d J) =CHRS{A) SNEXT J 
TVBTSADR(VBIS) sRETURN 

1340 DATA 216,162,0,160,9,222, 240,46, 6 
942,187,224,6,157,240,6,187,232,6,240, 
10,24 

1350 DATA 173,255,6,125,248,6,141,255, 
6, 24,185, 16,6,125,216,6,153,16,6,221 ,2 

08,6,208,6 

1360 DATA 189,200,6,153,16,6,200,200,2 
00,232, 224,7,144,201,173,255,6,141,0,2 
08,32,57,6,32,88,6, 76,98, 228 

{370 REM ## Display List in Page 6 ## 
1380 RESTORE 1390:FOR J=i536 TO 1479: 
EAD AsPOKE J A:NEXT J 

1390 DATA 112,112,112,70,0,0,68,20,.0,6 

8, 40,0,69,100,0,469,0,0,69,80,0,69,128, 
0,49, 208,0,69,0,0,69,80,0 

1400 DATA 69,128,0,69,140,0,68, 180,60 
1410 DATA 68,0,0,70,40,0,65,0,6 

1420 DATA 0,0,0,0,0,0,172,55,6, 240, 23, 
206,56,6,16, 18,177,208, 141,6,210,200 
1430 DATA 177,208,240,5,141,56,6,200,1 
52,141,55,6,%6 

1440 DATA 0,0,172,86,6,240,40,206,87,6 
48,17, 169,13, 205 ,87.6,144,3,175,87,6, 
9,160,141,5, 210,208, 18,177,208 

1450 DATA 141,4,210,200,177, 208, 240,5, 
141,87, 6,200,152, 141,86,6,96,104,160,0 
162,0,169,7,74,92. 228 

1460 RESTORE 1470:FOR J=1541 TO i583 5 
TEP 3:READ A:POKE J,HI+A:NEXT J 

1470 DATA 2,2,2,2,0,0,0,0,1,1,8,2,2,5, 
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1480 RESTORE 1490:FOR Jef736 TO 17943R 

EAD ASPOKE J,A:NEXT J 

1490 DATA 0,80, 128,208,0,80,128,0,16,6 

4,144,192,16,64,144,0,1,255,1,255,1,25 

3,1,0 

1500 DATA 20,12,9,12,15, 

0,0,0,0,0,20,12,9,12,15, 

252,4,252,4, 252,120 

1540 HVSINT(VBI/256):POKE 1674, HVsPOKE 
1672, VBI-254#HV 

1520 RETURN 

1525 REM #* PR Images ## 

1530 RESTORE 1540:FOR Jai TO L2:READ A 

rCRS(G,JdSCHRS(AD NEXT J 

1540 DATA 231,60,90,60,24,60,90, 153,24 

196,356,102 

1550 RESTORE 1560:FOR J=1 TO 12:READ A 

YCRI$(0 J) =CHRE (AD SNEXT J 

1560 DATA 46,36,40,90,40, 153, 126,24, 24 
60,66, 198 

1570 BLS(1)=CHR$ (0) s BLS (13) =CHRS(0) s BL 

$(2)=BL$ 

1560 RESTORE 1590:FOR Je! TO 12:READ 4 

PORFLS(G, J)=CHRS (A) SNEXT J 

1596 DATA 195,36, 60,90,60,25,62,88, 156 

36,38, 96 

1600 RESTORE 1610:FOR J=1 TO 12sREAD A 

SCRF2$ (3, F)2CHRE(AYINEXT J 


1610 DATA 195,36,60,90,60, 152,124, 26,5 
7,36,100,6 

1620 RESTORE 1630sFOR J=i TO {2sREAD A 
HCRN$ (J ,J)=CHRS(A) NEXT J 

1630 DATA 66,165,60,90,36,24,126,153,6 
0,126,36,102 

1640 RESTORE 1650:FOR J=i TO {2:READ A 
THTI$ (0 ,J)SCHRSIA) SNEXT J 

1650 DATA 0,216,248, 248, 112,32,0,27,3! 
5, t4,4 

1660 RESTORE 1670:FOR J=i TO 12:READ A 
HT 2$ (0 JI=CHRE(A) NEXT od 

1670 DATA 0,27, 51,31, 14,4,0,216,248,24 
8,112,32 

1680 RESTORE {490sFOR J=1 TO f2:READ A 
TCURS(G J)SCHRE(A)SNEXT J 

1690 DATA 68,238,254, 254,254, 254,254,1 
24,124 ,96,56,16 

1700 REM #* PM Init. ## 

L710 POS(1)=CHRS (0) POS (256) =CHRS (0) P 
O$(2) =PO$: YPOS= 1873 P0$ (YPOS) =CRF 

1720 PAS(L)SCHRS (0) sP1$ (256) =CHRS (0) P 
1$(2)=P1$sP2$¢ 1) =CHRS (0) P28 (256) =CHRS 
(0) 3P2$(2)=F2$ 

1730 P3$(1) =CHRS (0) sP3$ (256) =CHRE(0) 3P 
3$(2)=P3$sP 19160) =CRM$s P2$ (44) CRE UFO 
$100: DELJSSsRTLU=200:LLJ 200: DELTA=6 
1740 POKE 54279, HIsPOKE 559, 62:POKE 93 


277, S:POKE 53248, 120:POKE 764,116: POKE 
53249, 12:POKE 705,92 

1750 POKE 53250, 100:POKE 706,20:POKE 7 
07, 0:POKE 423,1 

1760 RETURN 

1770 REM #* Packages on Belts #+ 

1780 DD$(1)="@"sDD$(448)="8"s O08 (2) =h0 
$ 


1790 FOR 321760 TO 1764:SPEED=RND (0) #1 
9-DIF) #44 (7-DIFI SIF DIFD3 THEN SPEED=S 
PEED#I.8 

1792 POKE J,SPEED:NEXT J 

1800 FOR L=0 10 bRESTORE 1850+10#L :RE 
AD FS:FOR K=0 TO 3 

1810 POS=64eL +1 64K: DDS (POS#I)=FS 

1820 IF DIF)3 THEN DD$(POS+9) =F 

1840 NEXT KsNEXT Li RETURN 

1845 REM #4 CHAR, IN 1860,1880 & 1900 

ARE INVERSE + 
1850 DATA ACB 

1860 DATA ACB 

1870 DATA DDD 

1880 DATA £FG 

1890 DATA EFG 

1900 DATA DDD 

1910 DATA EFG 








BOOK REVIEW 


THE ELEMENTARY AIAK! by William ¥. sanders. 


Distributed in Australia by Prentice-Hall, 


After carefully studying this book | 


Reviewed by Raul Aielic, 


feel that their 


computer! 
pictures and jokes in 


RRP, $23.95 


The book also has some amusing 
it, which makes it a little 


it does exactly as its name implies -it teaches you 
BASIC programming, from elementary beginners topics 
such as PRINT, CSAVE, CLOAD, etc. through to the more 
advanced topics like Player Missile Graphics and 
Printer Graphics, 

Being a beginner in BASIC myself, I found the 
book to be very helpful, It gave plenty of detail on 
every topic I wanted and at the same time is written 
in an uncomplicated and friendly manner -iaplying 
that there is no need for any novice to be scared of 


more enjoyable, 

I like the way the book has been presented, 
having a spiral binding which means the book is 
easily left open while sitting beside your computer. 

I do however, feel that the book is slightly 
overpriced considering its content, but can 
thoroughly recommend it to any beginners who would 
like to learn how to use their Ataris more 
effectively. It is an excellent production! 


Shakespeare and the Computer 


Extracted from “The Official Computer Hater ’s Handbook", 
by Stephen Lewis (reprinted from Computerise Utah, Vol.3 issue !) 


About computer Manuals (Hamlet I1,2) 
"Though this be madness, yet there 
in't," 








is method 


About peripherals (Hamlet 1,3) 
"Costly thy habit as thy purse can buy” 





About program bugs (Hamlet 1V,3) 
“When sorrows come, they come not single spies, 


but in battalions," 


On computer salesmen (Hamlet 1,5) 
"One may smile, and smile, and be a villain," 








On meeting people via the BBS (The Tempest [1,2) 
"Misery acquaints a man with strange 


bedfellows.” 


P.S. From a computer widow comes the renark- "It 
would be nice if computer languages were dead 


languages. " se 


Add A Numeric Keypad 


by Chris Fitzgerald. (llvde, N.S.W.) 

This article follows on from an article in the 
June 1984 issue of Inside Info (No.{3). The article, 
by Peter Baatord explained how to wire up an extra 
keyboard for your Atari and mentioned that I had 
wired a numeric keypad which would connect to the 
same connection, 

I have assumed that you have already carried out 
the wiring of the socket on the computer itself as 
explained in the abovementioned article, so here is 
the stuff you'll need to build the numeric keypad:~- 
1) Keypad -from Dick Smith Electronics. It cones 
ona printed circuit board at a cost of $19.95. 
Catalogue Nuaber 3622, 

2) Ribbon Cable -at least ii-conductor. I used 1 
metre of rainbow cable. 
3) 25 pin female ‘D’ Type connectors with cover, 

It is possible to buy your own keys (you'd need 
fourteen) and wire thea up and mount thee -but at 
$1.50 each the unit would cost $21 just for the keys. 

THE PROCEDURE 

Figure 1 (below) shows the layout of the printed 
circuit board on the suggested numeric keypad. This 
board is manufactured by “HI TEK" and is labelled 





"LKOSA NUMERIC KEYPAD". This diagram is a view fro Figure i 
the back -the side you'll be working on. Since this Printed Circuit Board Wiring Diagras 
circuit isn’t totally suited for what we want, it {viewed from back) 


needs to be altered before final wiring. 

1 There are three points marked with an "X" in 
figure 1. Use a sharp knife or some tool to cut 
through the printed circuit “traces” at these points. 
2 Next, some extra "traces" need to be added in the 
fora of short lengths of wire. Figure 1 shows these 
points labelled from "A‘ to "I". In sequence, wire:- 
A-A B-B C-C-C D-D E-E F-F 6-6 H-H and J-I. 
HINTS: 1) Tin all wires before actually soldering. 

2) Follow the diagraa closely, connecting wires in 
the sequence shown. 

3S On diagram 1 you will also notice that there are 
eleven points labelled using numbers between ! and 
17, These are the pin numbers to which these points 
should be connected (using the rainbow cable) on the 
feaale ‘'D' connector, The pin nuabers (1-25) are on 
the actual connector -if you look closely you'll see 
them and avoid wiring errors. If you get your own 
keys and connect thea up yourself, then follow the 
pin numbers on the arrows in Figure 2, Key Wiring Diagran 
HINT: I recommend that you follow a colour coding (viewed from back) 
sequence to make things a little easier. It isn’t 

possible to follow the exact colour coding of the 


E 
N 
T 
E 
R 











connections mentioned in the previous article without : 
splitting the cable into several segeents. To avoid rd 

this I used some other colours -diagram 3 indicates o z a w 

the colours | used, if the colour is underlined it “4 cj) oO x) 4 c! 
follows previous convention. aes xr~ucc -F 
4 After finishing the wiring you should be able to 5 2 i 5 rape = Fe 2 ci 
plug the key pad into the socket you added to your LIS Oo Og ole 
Atari before -it should work just as if it was part esseeseeeenes 
of your normal keyboard. Check that all the keys 

operate as they should -if not, recheck all the Se es ees 
connections for bad joints or short circuits. Also, 

check to see you have No.! to No.{ etc. Figure 3 


I haven't mounted my keypad yet, but it should 
be an easy job -especially with the PC Board on it. 


ca 


Suggested Key Pad Colour Coding 


Strings and Formatting 


ATARI Demopac #1 (Revision 2, September 1982) 


STRING HANDLING 
ATARI 8K BASIC vs. ATARI Microsoft BASIC 
The major difference between ATARI Microsoft and 
in the handling 
Here is an overview of the ATARI 8k 
approach to strings, and a comparison with the ATARI 


ATARI 8K BASIC is 
variables, 


Microsoft method. 


It is often necessary to split strings into 
In ATARI Microsoft BASIC, 


pieces called substrings. 


this is accomplished with special functions, 
In ATARI 8K BASIC, 
split easily by using a subscript on the string 
AS(S, 10) 
substring which starts at the fifth character of A$ 
If only one nuaber 
is given in the subscript, the substring will start 
with that character and end with the 
Here is a table of the ATARI 8K 
equivalents of ATARI Microsoft string functions: 


RIGHTS and LEFTS$. 
variable. For exaaple, 


and ends at the tenth character, 


of the string. 


string. In 


of string 
character. 


ATARI 
accoaplished with a plus sign. 
second string is concatenated to the first by making 
ita substring which starts just after the last 
Here is an example of two types of 
concatenation in both BASICs: 


concatenation is 
In ATARI 8K, the 


Microsoft, 





ATARI Microsofts: ATARI 8K: 
ASEAS+BS AS(LEN(A$) +1) SBS 
CS=A$t+B$ C#=A$ 


MIDS, 
strings are 
results in a 


last character 
types of BASIC: 





ATARI Microsoft: ATARI 8K: 
MIDS(A$,X,Y) AS{X,Y) 
LEFT$(A$,X) AS(1,X) 
RIGHT$(A$,X) AS (LEN(A$) -X+1) 


The function LEN(A$) is the same in both types 
and returns the length, 
characters (including blanks) of the string AS. 
in concatenation of strings, 


of BASIC, 


function is also used 
that is, 


1 REM FRdHRARGAEHRAHAOTRH ERENT EHEHHY 


2 REM # STRING ARRAY 4 
3 REM # ATARY Demopac #1 i] 
4 REM 4 March 1982 # 
5 REM # Reprinted by A.C.E.{N.S.W.) # 
& REN @ December 1984 # 


7 REM S9RPGaOReSHR Ra AREA ASN G SHES IG HT 
10 REM STRINGARRAY 

20 REM WBB/J8 3/82 

30 REM a demonstration of the use of a 
long-string variable 

40 REM to emulate a string array, 

50 REM This exaaple keeps a list of 

customer names. 

60 REM It will handle up to 100 names, 
each up to 30 characters long. 

70 REM HEREEEEREREERERELESESEPEREE REE 

80 DIN ARRAYS (100#30) NAMES (30) , BLANKS 
(30), YNS(1) 

90 REM array$ holds 100 names 

100 REM names is used to accept input 

nane 

110 REN blank$ is used to blank-fill, 
so that lengths are even 

120 REM yn$ accepts yes/no answers 

130 BLANKS=" 

“SREM initialize 30-space string 

140 FOR I=i TO 100:REM initialize long 

“string to reserve memory space 

150 ARRAY$(1#30-29, 1#30) =BLANKS 

160 NEXT [:REM fil] w/spaces-length of 
array$ is now 3000 

170 REM #eeeeeeeeeeeeeneaeeeeeetate 


putting two strings together 


or nuaber of 

This 

into one 
that it doesn't already exist 

190 PRINT :PRINT "CUSTOMER NUMBER (1-1 

00) (O=END)*: 

200 INPUT I 

210 IF J=0 THEN 410:REM if it's the 

end, go print the list 

220 IF ARRAY$(1#30-29,1#30)=BLANK$ THE 

N 320:REM if new number, go get nare 

230 PRINT "CUSTOMER NUMBER “sI;" IS AS 
SIGNED TO:* 

240 PRINT ARRAYS (1#30-29, 1#30) 

250 PRINT :REN if number is already in 
use, print out number and name 

260 PRINT "DO YOU WISH TO REPLACE WITH 
NEW NAME (Y/N) *s 

270 INPUT YN$ 

280 IF YN$="N" THEN 190 

290 IF YNS="¥" THEN 260 

300 REM if you want to replace it or 
it's a new number, go ahead 

310 REM SESEEEESERESEREEEEEEEEEREESEE 

320 PRINT "CUSTONER NANE “3 

330 INPUT NANES:REM get new name 

340 REN fill up name with blanks, in 

case it is less then 30 characters 

350 NAMES (LEN (NAMES) +1) =BLANKS 

360 REM concatenate new name into 

array 

370 ARRAY$ (1430-29 , 1#30) =NAMES 

380 GOTO 190:REN go get the next one 

390 REM ERERERARSHASEEEAEEERESERE REESE 

400 REM print out the customer list 


410 PRINT "DC *Gu WANT TO PRINT THE CU 9640 END 
180 REM get customer nueber and verify | STOMER” 


/ 


ATARI Microsoft: 
A$(1)="AAA® 
A$(2)="BBB* 
A$(3)="CCC* 


When using the Jong-string sethod, 
helpful to make all of the substrings in the array 
the same length, so that it is easy to calculate the 
position in the array. 
the smaller substrings with blanks. 


C$ (LEN (C$) +1) =B$ 


In ATARI Microsoft, the subscript on the string 
indicates a string array, which is handled just like 
a numeric array. 
string is kept ina very long string, which is put 
together using concatenation, and taken apart with 
string splitting, as shown above. 

Here is an example of a siaple string array in both 


In ATARI 8K BASIC, however, a 


ATARI 8K: 
ARRAY$="AAABBBCCC" 
ARRAY$(1,3)="AAA* 
ARRAYS (4,6)="BBB" 
ARRAY$(7,9)="CCC* 
it is often 





This can be done by padding 
Remeaber, blank 


420 PRINT " LIST ON THE SCREEN (Y/N) * 


430 INPUT YN$ 

440 IF YNS="N" THEN 530 

450 IF YN$<>"Y" THEN 410 

460 REN if the answer is yes, go ahead 
and print on screen 

470 PRINT “NUMBER”, "CUSTOMER NAME*:PRI 

NT 

480 FOR I=! TO 100 

490 IF ARRAY$(1#30-29,1#30) (>BLANKS TH 

EN PRINT 1 ARRAY$(1#30-29, 1430) 

500 NEXT I 

SiO PRINT sPRINT "## END OF LIST ##"sP 

RINT 

520 REN SEAEEEHAEEESEES EEE SED AEEEEEED 

530 PRINT “DO YOU WANT TO PRINT THE CU 

STOMER® 

340 PRINT "LIST ON THE PRINTER (Y/N)*; 

350 INPUT YN$ 

560 IF YN$="N" THEN END 

570 IF YNS<>"Y" THEN 530 

580 REM if the answer is yes, go ahead 
and print on printer 

590 LPRINT "NUMBER", "CUSTOMER NAME":LP 

RINT 

600 FOR [=$ TO 100 

610 IF ARRAY$(1#30-29, 1430) (BLANKS TH 

EN LPRINT [ ,ARRAY$(1#30-29, 1#30) 

620 NEXT I 

630 LPRINT :LPRINT “## END OF LIST #4" 
tLPRINT 


Cay 


DOUBLE-SUBSCRIPTS 


Emulating Two-Dimensional String Arrays 
With ATART 8K BASIC 


COL+1 2 3 4 
XX X x ¥ x 
1 2 3 78 9 
MX Xx FR RR EX XX PR XY 
1314 15 | 16 47 187 19 20 21 7 22 23 24 
XX wo PX eX x x x 
25 26 27 | 28 29 30 34 35 36 


ASE" YUNRKEKRNRRRN NAN KN RRR K ARERR RR ERK RE RY 
bylyoves caddy 08 
fo find the starting location of a particular 









Zon 
8) 


substring in the array A$, use the following foraula: 
((COL-1) CHAR) + { (ROW-1) #CHAR#NUMCOL) +1 
ROW == ~=row nuaber 


COL = coluren nuaber 
CHAR = number of character per element of array 
NUMCOL = total number of coluans 


In the example given, CHAR=3, and NUMCOL=4, In 
order to find the starting location of AS(ROW,COL), 
where ROW=2 and COL=4, perform the following 
calculation: 

( (4-4) #3) +( (2-1) #344) +12 
((3) #3) 4 ( (1) #384) f= 
(9) +#({2) +1222 

Thus, the starting character of substring 
A$(2,4) is character number 22, This substring is 
addressed as A$(22,24). 





1 REM ROdHHREHR ENDER REESE HED | 30 REM turn a string into inverse 90 NAMES (1, 1)=CHR$(ASC (NAMES (1 ,1)) +128 
2 REM 4 INVERT A STRING #] video ) 

3 REN 4 ATARI Demopac #1 4] 40 REM teeeeeeceeteesreeeteseteeeeese | 100 REM add 128 to each character 

4 REM 4 March 1982 4] 50 DIM NANES(S0):REM dimension a nuaber to sake it inverse video 

5 REM # Reprinted by A.C.E.(N.5.W.) 4] string to a length of 50 characters 110 TRAP 40000:NEXT I 

& REM # Deceaber 1984 #] 40 TRAP 4O:PRINT “TYPE IN A NAHE" 120 PRINT NAMES:REM display inverse 


7 REM SRPeSSeeaAae aaa EaS a EE STTHESETHE 70 INPUT NAMES 
10 REM INVERT A STRING 
20 REM PY/JB 3/82 


80 FOR T= TO LEN(NANE$):REN go 
through characters one at a tine 


name 
130 GOTO 40:REM try another one 





FORMATTING WITH THE COMMA 
The comma in a PRINT statement sets up 10 spaces 
between each field with the default line length of 38 
characters. This results in diagonal lines rather 
then columns. For an example of this, press RESET 
and type: 
PRINT 1,2,3,445,6,7,8 


The left margin is controlled by location 82. 
For a full 40 coluan line, change the left margin to 
column 0 with POKE 82,0, Since 10 goes into 40, you 
will get regular coluans. Press RESET and type: 
POKE 82,0:PRINT 1,2,3,4,5,6,7,8 


You may also regulate the print zone for the 
comma with location 201, This example gives 7 spaces 
between fields, then resets the width to 19. Press 
RESET and type: 

NEW 

{0 POKE 82,0:REM allow 40 characters 

20 POKE 201,8:REM set comma spacing to 7 

30 PRINT 1,2,3,4,5,6,7,8,9,0,4,2,3:REM print to 
screen 

40 POKE 201,20:REM reset comma spacing to 19 

50 PRINT 1,2,3,4,5,6,7,9,9,0,1,2,3:REM print to 
screen 


*# Remember to add one space in formatting to get 
desired coluan widths ## 
You @ay also shorten the right sargin by using 
POKE 83. The default is 39, This exaaple sets a 30 
coluan screen. Press RESET and type: 
NEW 
10 POKE 62,i:REM start left margin in position | 


ed 


20 PRINT "This line has old margins of 2 and 
J9":REN the next line has the new aargins 

30 POKE 83,30sREN stop right margin in position 30 

40 PRINT "12345678901 23456789012345678901234567890 
{* 


FORMATTING WITH THE 
POSITION STATEMENT 
Words as well as nuabers can be put on the 
screen through the use of the POSITION statement. In 
the following example, the word “ATARI” is positioned 
on the screen three tiaes by designating the X and Y 
co-ordinates in three POSITION statements. Press 
RESET and type: 
NEW 
10 POSITION 8,2sPRINT “ATARI":REM go to position 
8,2 and print word 
20 POSITION {8,12:PRINT “ATARI":REM go to position 
18,12 and print word 
30 POSITION 28,22:PRINT “ATARI":REM go to position 
28,22 and print word 
40 GOTO 40:REM keep it on the screen 


POSITIONING IN GRAPHICS 
WINDOW 
The POSITION statement can also be used to write 

information in the graphics window of text sodes ! 
and 2, Press RESET and type: 

NEW 

10 GRAPHICS 2 

20 POSITION 5,5:REM position cursor in row 5, 
coluan 5 

30 PRINT $6;"ATARI" 

40 GOTO 40:REM keep it on the screen 


Cay 


FORMATTING with ATARI 8K 
BASIC 

Every computer has some way of placing text 
where you want it, in order to create exactly the 
effect you need, most computers have special 
formatting commands. With ATARI 8K BASIC, there are 
several methods to choose from depending on your 
needs. Using the TAB key allows quick movesent 
across the screen toa designated column. Using a 
comma in the PRINT statement will automatically allow 
a number of spaces between fields. The POSITION 
statement can be used to put the cursor in any 
specified row or column, in any mode, In addition to 
these basic methods, there are special procedures for 
formatting printed output, and for such functions as 
right alignment. Here is a brief description of 
various formatting options with examples. 

FORMATTING WITH TAB KEY 

In order to produce the control characters for 
TABing, the following key sequences are used. 
These characters will appear on your screen but not 
77 a program listing. 


TAB: > Press the ESC key, then the Tab 
key 
CLEAR TAB: G Press the ESC key, then the CTRL 
and TAB key Simultaneously 
) Press the ESC key, then the SHIFT 
and TAB key Simultaneously 


SET TAB: 


c 


(in powerup, the TAB key advances the cursor tc 2 
default settings on one physical line. These are 
coluan positions 7, 15, 23, 31, and 39, To clear the 
default TAB setting, type: 


PRINT “ MOHGMGHG" 


f¢ter the ready prompt appears, press the TAB 
key. The cursor will remain in the first column. To 
set new tabs type: 


PRINT “(18 spaces}H(1@ spaces}(1@ spaces) i} 


If the TAR key 15 now pressed, the cursor stops 
in columns 2, 12, 22, 32, 
## Remember to add one space in formatting to get 
desired coluan widths, ## 
To set formatted columns from within a program 

requires planning on the part of the programmer. 
The following program illustrates 8 columns with § 
spaces between each, These will then be cleared out 
to set up 3 colums with 16 spaces between each, 
Press RESET and type: 

NEW 

10 PRINT “HGOGSGPGME':REM clear out de 

fault tabs 

28 PRINT “(6 spaces)}(6 spaces}9(6 spa 

ces)Qt6 spacesoh(6 spaces)@(6 spaces)@ 

“REM set columns 

3@ PRINT “APBICHODEDF DGPHDIDIPK OL MDM 

:REM use tab to Separate fields 

4@ PRINT “HUPQGHGPGMG': REM Clear colu 

mns 

$@ PRINT “(17 spaces)(i7 spaces)ti7 

Spaces}—}":REM set new columns 

68 PRINT “ADBDChODEDF™ 


TABing brings columns to the next print zone as 
long as the length of the string is smaller than the 
print zone. 

POSITIONING IN TEXT WINDOW 

The POSITION statement moves the cursor in the 
graphics window. If you wish to position the cursor 
in the text window, you aust POKE directly into the 
text window cursor locations, 654 and 657 (deciaal), 
Press RESET and type: 

NEW 

10 GRAPHICS 2 

20 POKE 656,0:REM move cursor to row 0 

30 POKE 657,2:REM move cursor to column 2 

40 PRINT "LINE O"SREM type "LINE 0” in this 

position 

50 POKE 656,1:REM move cursor to row {, 

60 POKE 657,12:REM move cursor to coluan 12 

7Q PRINT "LINE 1"sREM type "LINE 1" in this 

position 

80 POKE 656,2:REM move cursor to row 2 

90 POKE 657,22:REM move cursor to column 22 

160 PRINT "LINE 2"sREN type "LINE 2” in this 
position 

110 POKE 656,3:REM move cursor to row 3 

{20 POKE 657,32:REN move cursor to coluan 32 

130 PRINT LINE 3";:REM type “LINE 3” in this 
position 

140 GOTO 140:REM keep it on the screen 

RIGHT ALIGNMENT 

If your strings are not the same length, pad the 
shorter one with spaces. The following exaaple 
illustrates a string being concatenated to a string 
of spaces to allow for a three character number, 
Press RESET and type: 

NEW 
10 DIM AS(2) ,BS$(3):REM dimension strings 
20 PRINT "Type in a one or two digit 

number... "prINPUT A$ 
30 ALENSLEN{A$) 
40 B$="(insert 2 spaces) ":REM a string of spaces 
50 BS=BS(1,3-ALEN):REM allow a three digit nuaber 
60 BS(LEN(B$)+1)=A$:REM concatenate the strings 
70 PRINT LEN(BS$) 
BO PRINT BS:REM note indent from left side of 

screen 

PRINTER FORMATTING 

Tabs on the printer can be set with a string of 
spaces, a5 in the following example. Press RESET and 
type: 

NEW 

10 DIM TAB$(80) ,AS(35):REM dimension strings 

20 X25 

30 TABS$="(insert 80 spaces)"sREM set up a string 
of spaces 

40 A$="This line is indented by 25 spaces":REM 
message to be printed 

5) OPEN #1,8,0,"Ps"sREM open printer for output 

60 PRINT #L;TABS{1,X);A$:REM output to the printer 


70 CLOSE #1 


oF 


PROGRAM REVIEW 


SPELL WIZARD 


Reviewed by Chris Fitzgerald. 


SPELL WIZARD is an excellent, 
friendly, spelling checking program 
DATASOFT Inc. It is a two part program which comes 
on two disks (one side per disk)- the auto-boot 
program and the MAIN DICTIONARY. The disks are 
presented in a small ring binder with clear, concise 
instructions and costs about $159.00 in Australia -] 
got my copy from the States for $947.00 plus duty. 

While SPELL WIZARD has it’s own dictionary, it 
does not give the meanings for words, nor does it 
check that the words you use are used in correct 
context -it is purely an aid to check and correct 
spelling. 

On booting the program disk you are presented 
with four options: PROOF DOCUMENT, PRINT DICTIONARY, 
SEARCH DICTIONARY and EXIT SPELL WIZARD. You step 
through these options by pressing the OPTION key and 
execute the option by pressing the START key. For ay 
own convenience I'll cover these options in reverse 
order. 

EXIT SPELL WIZARD This allows you to instantly 
boot any disk-based program (i.e. word processor) 
after proapting you to place the disk into the drive, 
SEARCH DICTIONARY The program asks you to enter 
the word you would like to look up. You can either 
enter the whole word or, if you are uncertain of the 
spelling, the first few characters of the word 
followed by an asterisk (#) which the program accepts 
as a wild card (NOTE: You cannot start the word with 
awild card'), You are then instructed to place the 
NAIN DICTIONARY into the disk drive and press RETURN. 
The dictionary is searched and the relevent word(s) 
is displayed on the screen. One problem here is that 
the program only allows five words to be displayed on 
the screen at atime. If there are more than five 
words found in the dictionary they will scroll up the 
screen at phenomenol speed and although you can 
interupt the scrolling by using the SPACE BAR, you 
need mighty fast reflexes to stop at the correct 
word. You can then return to the MAIN MENU. I feel 
that it would have been handy to be able to check the 
user dictionary as well as the main dictionary. 
Another drawback for us Aussies is that the aain 
dictionary contains Yank spelling and can’t be 
altered -you just have to lump it. 

PRINT DICTIONARY This option is exactly the same 
as the SEARCH DICTIONARY option except that it lists 
the words to the printer in four columns. An error 
message is displayed if the printer is not available. 
PROOF DOCUMENT This is the most important option, 
the one that allows you to check the spelling of any 
DOS TH] format file which has been created by a word 
processor ti.e. in Listed fora). 

Firstly, you are prompted to put the word 
processor files (DOCUMENTS disk) into the disk drive 
and press RETURN. A two coluan disk directory is 
then displayed and you are prompted to enter the name 
of the file you wish to check, 
The document file is then 
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compiles a “list” of all the UNIQUE words used in the 
document. SPELL WIZARD saves tiae by checking each 
word only once -although a word say be used several 
times in a docuaent it is only recorded in the unique 
words “list” once. While all this is happening, a 
read-out is given showing the total number of words 
in the document as well as the unique words used. 

Once this process is finished you are proapted 
to place the MAIN DICTIONARY inte the disk drive and 
press RETURN. Your spelling is then checked against 
this 30,000 word dictionary with the words being 
"crossed-off" the "unique words" list as they are 
found. You are then asked if you would like to check 
the remaining words against a USER DICTIONARY (one 
compiled by yourself). Doing this is auch the same 
as using the aain dictionary only you will be asked 
to enter the filename of your dictionary. 

When finished checking dictionaries, you can 
check any words which weren't found, individually, 
Your document disk is again read by the program and 
each word that wasn't “crossed-off" the list is 
presented for you to correct or accept. I had a few 
probleas with this since I tended to automatically 
press the relevent keys and continue past incorrectly 
spelled words -and it’s impossible to go back and 
correct the word. At this point you are also allowed 
to check the main dictionary for correct spelling but 
you can’t check your user dictionary. Having checked 
your spelling, you say then “write” your document 
back to disk with the corrections already carried 
out. You then have the option of adding these extra 
words to your USER DICTIONARY, 

USER DICTIONARY After having checked four issues 
of Inside Info, I now have a user dictionary of about 
661 words. This is made up from jargon and 
specialized words such as Atari, filename, joystick, 
etc, These words are easily added to the user 
dictionary, you can either write all of the words to 
the dictionary in one go, or select the words of your 
choice, one at a time. SPELL WIZARD will recognize 
any alphabet character or series of characters as a 
word i.e. ‘N.S.W.’ is recognized as three different 
words! 

OTHER COMMENTS SPELL WIZARD can also be booted 
with two disk drives. I've found that if you put 
your user dictionary on your documents disk, you 
won't need to keep swapping disks around -a real tine 
saver! 

SPELL WIZARD is acinch to use and it doesn't 
take very long torun. & nice touch is that no 
matter which option you use, you can return to the 
main menu by hitting SYSTEM RESET, I's very happy 
with my investment -especially for editing INSIDE 
INFO, 

As a matter of interest this article has a total 
of 997 words with 372 unique words. It took around 3 
hours to write and about 6 minutes to check on SPELL 


WIZARD. 
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Article Submission Guidelines 


by Chris Fitzgerald. 


I'm sorry to have to end my year as teaporary 
(2) Editor on a sour note but there have been several 
prcblems I've had to overcome as Editor of Inside 
Info. The purpose of this article is to try and 
eliminate them for Ken Shiu as he takes over the job. 
Please note them and try to stick by them -it‘l! make 
a difficult job a little easier, 

WE NEED ARTICLES 

Lately it seems that we are printing a@ore and 
more articles from other users’ group magazines. 
Knowing that we have a membership of around two 
hundred and fifty, I can’t understand why we aren't 
getting more input from our members. Inside Info is 
supposedly the voice’ of Atari Computer Enthusiasts 
New South Wales but it seems that the club has very 
few voices, If our members aren't prepared to 
support the magazine there is the possibility that 
Inside Info could be greatly reduced in size or even 
discontinued’ The club needs YOUR help -start asking 
yourself what you can do for the ciub! 

REVIEWS 

If you buy a book, program or item of hardware 
and you don’t think it’s been reviewed in Inside Info 
before give your fellow members the benefit of your 
experiences -write a review. 

Are you happy with it? 

Was it worth the money? 

Does it do what it claims to do or should others give 
it a big miss? 

Where did you buy it and what did it cost? 

Always remember to give the name of the 
manufacturer or distributor along with the 
recommended retail price at the head of the article. 

If the item was no good you can warn others and 
Save them some money. If it was good you can put 
others onto a good thing, 

HINTS/TIPS 

All of us get little tidbits of useful 
information as we muck around and explore our Ataris 
or programs for the Atari. Let everyone else know 
-through Inside Info. 

PROGRAMS/ARTICLES 

Most of us bought our Ataris to write programs 
on, in the past year only eleven people have 
submitted programs for the magazine -that’s only 4.4% 
of our membership! Again, there are no programs 
written by our own members in this issue! 

Assuming that you'll be submitting some programs 
tor Inside Into ALWAYS write an article (no satter 
how small) to go with it. Explain what the prograa 
does and how to use it -screen by screen if 
necessary, Don't leave the article for the Editor to 
write. 














FEEDBACK 

We need feedback! Without feedback Inside Info will 
become a magazine which won't be of interest to you 

because it won t be able to meet your needs. 

ARTICLE SUBMISSIONS 

Copy your article or program onto your own media 
and check that it can be loaded back into the 
computer. I+ you need your media back in a hurry, it 
can be copied and mailed back to you as soon as 
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possible -this1! make things abit easier. Dont 
forget to put your name and address on your disks, 
cassettes or whatever. 

Use DOSII, Single Density 

The Club has opted to keep using DOS II in 
single density foraat since virtually everyone has 
access to it. It is tricky to convert BUS 3 back to 
DOS II and most people only have single density disk 
drives. These instructions are now included on the 
information sheet on pace 2. 

Put articles on disk or tape 

It will save a lot of time and be heaps fore 
convenient if your article is provided on either disk 
or tape rather than hand written, Not everyone is a 
good typist {including us so-called Editors!) and it 
takes a long time to type one page of Inside Info 
-try it and you'll see what I mean. 

Don't worry about formatting your articles except 
gaybe for paragraphing. 

If you just want to put a short add or notice or 
something in Inside Info, just write it out and hand 
it to the Editor -don't rely on his memory, or you 
may be disappointed, 

Word processors 

Any DOS [I based word processor such as 
Atariwriter or the Atari Word Processor is suitable 
for writing articles for Inside Info. LUK's Letter 
Perfect is not suitable unless you convert the text 
file to a DOS TI format using LdK’s file utility 
disk, 

There are also a few other public domain word 
processors such as Seriptor which was originally 
printed in SoftSide magazine. The Editor in ACTION! 
is also suitable for preparing text files. 

TinyText 

In Inside Info number {14 (August 1984) a BASIC 
program listing for a word processor called 
‘TinyText’ was printed. This word processor will 
work with either cassette or disk based systems. I¢ 
you don’t want to type it in, it is available trom 
the software exchange on "Inside Info Volume 3°. 
BASIC 

Alternately you can use BASIC REM or DATA 
statements to write your article -just LIST it to 
disk or tape when you finish, 

ASSEMBLER /EDITOR 

This cartridge can also be used as a word 
processor. In the EDIT mode and using line numbers 
you can type 3 screen lines of text before hitting 
RETURN, Blank lines can be inserted by typing “ESC 
CONTROL +’ or “ESC CONTROL # then RETURN. You can 
use ‘LIST#D:FILENAME’ to write you text to disk with 
line numbers or ‘PRINT@D:FILENAME’ to write to disk 
without line numbers -the latter is preferred. These 
functions can also be carried out using a cassette. 

MEET THE DEADLINES 

Deadlines are marked on the meetings dates on 
the information sheet on page 2 with a ‘#'. It is 
important that you give the Editor as much time as 
possible to get your article (and others) ready for 
print. Even though the date is a month ahead c! the 
release date, it takes one to two weeks to get 
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printed, folded and mailed. If you're going to be 
late, let the Editor know -he may not be able to do 
it in the time, 
Several people have promised articles which I’ve 
counted on receiving but they just never arrived, 
That meant that I had to find other articles at the 
last minute -not an easy situation. 
TYPING 

At the October neeting I handed out a lot of 
articies from other users group magazines to people 
for typing. I really thought that I‘d get sone of 
them back at the November meeting -but nothing! 

Fortunately [ haven't needed them but piease 
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Ren Scalliey. 


This month I am going to talk about something 
that a tew people have asked to see in this column 
-disk copy protection techniques. 

Refore I start, I want to make two things clear:- 

1) { am not going to go into the pro's and con's of 
piracy. 

2) This article will not show you how to copy your 
protected disks, It will however show you why you 
can't! 

That having been said, on with the story. Once 
upon a time, when manufacturers started to protect 
their disk based games, they relied on the fact that 
Atari DOS, when copying a disk, could only copy 
sectors marked as being in use. The method was thus 
to include some data in a sector not aarked as in 
use, and to check for that data before allowing the 
program to run. Programs that copy all sectors on a 
disk (not just those in use) soon got around this 
method of protection, 

The next protection system was based on having a 
"bad" sector (a sector that the drive can't read) on 
the disk, The program could then check if the 
relevant sector was bad (that is, it ‘returned error 
144 when read... crunch Since it is 
not possible to simply write a bad sector with an 910 
drive, this became a very popular protection 
technique. However, someone eventually found that by 
Changing the disk drive speed and then writing a 
sector, the sector would return an error 144 when 
read back at normal speed, 

We now move on to the systems mostly in use at 
the present time. Protection systems have become 
very sophisticated! (ne popular method is to have 
bad sectors, but not only do the programs check that 
the sectors are bad, but also for pieces of data 
stored in those sectors. 

Another method is to have two ior even more) 
sectors on the disk with the same sector number, but 
containing different data. The disk drive, when 
reading a sector, will always read the first sector 


a> OSKussion ABS: 


wake sure you either type thera or return ther to the 
Editor, the copies you have are the only ones I aade 
and the pile of newsletters those copies came fron 
was at least 4 inches thick!!!'' No one wants to read 
al} that again. \ 
EPILOGUE 

well I’ve finished my whingeing, it really won't 
bother me too much if none of these quidelines are 
followed but I know what's in store for the new 
Editor if they aren't. I can only say I’m giad to 
have the burden of Inside Info lifted from my 
shoulders! I'll enjoy my new found freedom. 
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it finds with the required sector number. 
sectors in a particular sequence, 
forced to read both 
sectors, If the data in these sectors is the same 
(which of course is the case if the disk has been 
copied on a normal drive, and thus only one sector is 
actually on the disk), then the program can decide 
that the disk is a copy and print out a message (or 
format your disk or blow your drive up, or 
whatever!), This method in particular, is very speed 
dependent and complicated to install, 

The last two methods (that I know about!) are 
very new, The first is similar to the double sectors 
system described above but the checking for these 
sectors occurs on two tracks, This necessitates the 
two tracks on the copied disk to not only contain the 
correct data, but to also be positioned in the exact, 
corresponding position on the disk, otherwise the 
protection system will cause the program not to load. 

The second method involves writing a track of 
sectors at a speed slower than normal. If the speed 
is not too different to normal, the sectors will read 
back without errors, but more than 18 sectors (which 
is the normal case) can be fitted on the track. The 
program can then check if all these sectors are 
present on the disk and abort if they aren't. 

Well, that’s about ali {[ know on protection 
techniques that are used to protect Atari disks (at 
the tine of writing). J only a fraction of the cost 
and ingenuity involved in protecting disks could be 
used to write better programs...... I have seen some 
disks that have been very interesting to me in the 
aethod in which they have been protected, but the 
game,.'? (Japanese sting rays spring to mind...) 

That’s all for this sonth.,. now you can go and 
read interACTION! which is elsewhere in this issue 
(it had better be there! -this article checks for it 
and won't load unless it is!) 
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Tramiel Report 


by Michael Farber. 
(Reprinted trom Central Jersey Users’ Group Newsletter -Sept./Oct. 1984.) 


Mr Tramiel has nade public his plans for the 
future of Atari. Before [let you know them you 
should know that Mr Tramiel has not said that these 
are his detinite plans, He may change them a few 
more times until he feels that the plan is solid. 
However, aS of now these are Mr Tramiel’s plans for 
Atari. 

NUMBER {: Atari Corp. will discontinue the 
manufacturing off ALL video games systems which they 
make for the home including the 7800 Prosystem which 
Tramiel said he would keep, only a few weeks ago, 
NUMBER 2: Atari Corp, will no longer produce 
Atarisoft software for its competitors. Tramiel 
realised that this was one of the things that had 
hurt Atari in the past. 

NUMBER 33 Atari Corp, will discontinue all of their 
old home computers except one -the S00KL. Mr Tramiel 
said that he would sell out al] of the old computers 
and peripherals made by the old Atari, but keep the 
QQOXL as their low end computer in 1985, Besides the 
BOOXL Tramiel will introduce mid and upper range 
computers at a low price -this way he would have a 
troad area of the computer market covered. Starting 
in ‘§5, when Atari Corp, introduces their new 
computers, they li introduce a changed S00XL which 
will be totally compatible with all of the old Atari 
software (hopefully this will mean more companies 
making software for the Atari like the good old 
days}, We also know, as of now, that Tramiel will 
expanc the memory of the B00%L to 128k for the sane 
price or a small increase. As I see it Tramiel will 
either use bank~-switching in the 6502 (which can only 
handle 44k) or he 11 use the 65186 or 7510 chips. 
Either of these chips would be fully compatible with 
the old software and can handle {28k and be a lot 
more powertul at the same time. We don’t have any 
solid information about Tramiel s new computers, just 
rumours -some of which J think are true but I won't 
spread any rumours and get your hopes up until those 
rumours are substantiated, 

(ther news that most of you probably already 
know is that back in March 1934, before Traniel 
officially moved into Atari, he went to a computer 
company called Amiga with designs for some new state 
of the art chips that would supposedly revolutionize 
the hone computer market, Tramiel gave Amiga a 
$U550¢,000 down payment to develop his new chips for 


Atari's new computers, which were supposed to be 
available for Christmas. You may be wondering why 
the new computers won't be out for Christmas -it's 
because Commodore found out what Tramiel was 
developing and went to Amiga on the quiet last June 
to make a deal. It turns out that Commodore actualiy 
bought Amiga in duly along with the high level chips 
they were making for Tramiel and Atari. 

Gnce Commodore bought the rights to Atari's 
chips from Amiga, Amiga returned Atari's money, kept 
their chips to give to Commodore, and claimed that 
they never had a contract with Tramiel or Atari. 
This means that the new, revolutionary chips that 
Atari made are now under Commodore's name and can be 
placed in Comandore computers. But wait a minute, 
Tramiel didn't just sit there while Commodore Pearl 
Harboured him, He went to court and sueo Amiga and 
Commodore for millions. The court battle is still 
going on with Amiga and Commodore against Atari, but 
while this is all going on Tramiel was able to get an 
injunction against Commodore -stopping them fron 
using his chips as Jong as the court battle 
continues. When the court battle is over Coamodore 
will get the injunction taken off so the chips can be 
used in their own computers ~but only if they're 
proven to be Commodore's chips and not Atari’s, In 
ay opinion they are Atari's. 

Apart from this news, all has been quiet lately. 
So quiet that it’s eerie! There hasn't been auch 
major news on Atari or Commodore for a while now, 
this might mean that there's something big going on 
-right? All I can say about this extreme, unusual 
silence in the home computer field is that I don't 
think there’l] be a big Christmas war like in past 
years, — think that the war between Atari and 
Commedore will carry on into early to mid 1985, 

As you may already know, Commodore committed 
harikari this month by introducing the ‘Plus 4° -I'l] 
bet that Tramiel is happy. That's all they have to 
offer this Christmas because they're waiting for 
Tramiel to jump into the war after Christmas and 
Pearl Harbour then, 

That‘s all the news we have for this aonth. We 
hope to have more substantial news for you in the 
future. We're almost positively sure that by our 
next issue there'll be some sore important news 
until then, happy computing fellow Atarians! 





1050 Disk Drive Modification 


by Bill Fletcher. (Reprinted from Queensland A.C.E. Newsletter -October 1984) 


This month's aodification adds a write-protect 
bypass switch to the {050 disk drive and will save 
you having to constantly remove and re-stick 
wite-protect labels. A flashing LED (Light Ewitting 
Diode: is recommended so that you'll be aware that 
your write-protected disk can be written to. 

lindo the four screws in the drives casing and 
lift off the cover. Choose a suitable place to mount 
the switch and LED before starting work. The LED 
would naturally be on the front face of the drive but 
the switch may be mounted anywhere it will not foul 
the mechanism or touch any of the components, 

Once you have decided this, find the strap 
(link? marked “JP7> which is situated in the middle 
of the board, just behind U!0' (one of the chips). 
Remove this link. The front connection of this link 
will be the supply point for the CENTRE pole of your 
switcr the other side 1s connected to one ot the 
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D-P-D-T 
SWITCH ¢ 


end terminals of the same pole of the switch. 

Connect the poles of the switch as shown in the 
circuit diagras below, 5 volts can be found at 
‘TPIS’, located near the middie of the board, 
approxisately a quarter of the way from the rear. 
The earth can be connected to ‘TP15’ located near 
"TPAS', 

Ensure correct polarity of the LED -if you can't 
deteraine which way it should go, put it in and if it 
fails to light, reverse the polarity. 

The 100 Ohm resistor is there as a safeguard 
-recommended but not essential. The more adventurous 
of you could get a 3 position, 3 pole switch wired as 
follows:- 

POSITION 1 -bypasses (‘JP7’ completely, making 
the systea believe the disk is protected. 

POSITION 2 -system normal (acts as JP7', 

POSITION 3 -as shown here. 
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QUESTION: - If you attempt to rormal @ aisx using 
P05 2.08 and the disk is write protected the drive 
just stops and so does DOS. J have also tried this 
with 005 XL and DGS 3.. and the problem is there too, 
Also if you use X10 with 254, ditto! 

I wrote a program to call S10 direct, setting it 
up as per Technical Reference Notes (fool me‘), and 
the same thing happened. But if I changed OSTATS 
($303) fron $40 (read info) to 0 (no info exchange) 
bingo.. it works ok -formats the disk if not write 
protected, and error {44 straight away if write 
protected, 

So.. back to DOS 2, I found that location $0027 
is LDA #$40, which is setting SI0 to read. 1 changed 
it to LDA #$0, but nothing.. Same as before, 
HELP! Ken Scalley 

ATTENTION PRIMARY SCHOOL TEACHERS! 

If you would like to make contact with another 
primary school teacher and swap information (or 
whatever) on the Atari BO0OQXL, feel free to get in 
touch with Paul Sweeney. 

Mount Pritchard East Primary School. 

Townview Road, Mt Pritchard. N.S.W. 2170, 

Fhone (02) 4602-6453, 

SCRIPTGR WORD PROCESSOR 

Peter Tucker of Lismore writes: - 

The word processor program “Scriptor” which was 
published in the April 1983 issue of Compute! will 
not RUN on XL machines. This is due to an illegal 
entry in the ‘GCHAR’ (Get CHARacter memory location} 
machine language routine. 

The ROM routine which Scriptor accesses has been 
shifted in the XL machines and the coding had also 
been rewritten -the point of entry was at an ‘X’ 
register instruction whereas the XL machines use ‘Y’ 
register indexing for the same routine. After aany 
hours of disassembly I found the problem. Thus, to 
make the "XL Fix", all that needs to be changed are 
two bytes in line 9320:- 

change 254 to 35 then change 246 to 243 

The address of the JSR was 246:254 (63230) on 
the 400/800 and is now 243335 (62243) on the 
GO0L/BOOXL machines, 

SPELLING CHECKER FOR ATARIWRITER 

Before the Tramiel takeover APX was selling a 
program called ATSPELLER, Apparently this program 
could be called through AtariWriters main menu by 
pressing the letter ‘A’. Word has it that ATSPELLER 
has been superseded by another program called 
PROOFREADER which has a 35,000 word dictionary. 
Again, I can only assume that the program is 
available through Atari Customer Relations. 

There's also some other software from Atari 
which may be hard to track down, The “Atari 1020 
Color Printer Screen Print Software’, which a isa 
disk and documentation package that allows vou to 
‘dump’ any GRAPHICS 7, 7 1/2 or 8 screen to the 1020 
printer -according to the September 1984 Antic 
magazine this software is included with all 1020 
printers shipped since July 1994, And there's 
another one called "Using Atari Touch Tablet with 
BASIC’. 

















LETTER PERFECT 


In the last Inside Info |] neglected to ae: > 
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that Letter Perfect, Version 6, now comes ¢ [| 


Gisks, Letter Perfect now has a spelling checking 
option, and the extra disk is the saae dictionary as 
the one provided with SPELL PERFECT. While this 
option allows you to check spelling with the 
dictionary provided, it doesn't allow you to create 
and update a dictionary containing any other words. 

There's also a tip for anyone with Letter 
Perfect, I¢ you POKE 4226 with 107 you'll be able to 
read the directory as if it was standard Atari 00S. 
To return to normal DOS directories POKE 4226 with 
105 -this being the noraal value with DOS 2, 

NOTE:- This won't allow you to access the actual 
Letter Perfect files, only the directory! 

On enquiring about LUK’s File Utility Program 
disk, which allows you to convert froe DOS 2 to LUK 
DGS (and vice versa) J] was advised that it has not 
been updated to cater for DOS 3 and that they don't 
know if it ever will be! 

USING AMPLUSS, UDL 

When communicating via modem using the 
AMPLUSS.UDL software it is possible to send files 
direct from disk using the “supertransfer” option 
(OPTION Z). To do this your- 

1} aust be coaaunicating with another Atari. 

2) set both machines to Atari (ATASCII) mode using 
OPTION T, 

3} use the sage baud rate, 

4) set both Aaplus programs to half duplex. 

5) set both modeas to full duplex, 

4) the receiver aust press START {in terminal mode) 
first. This will send a ‘half cursor’ {CONTROL U) 
character to the sender. 

7) the sender, on seeing the ‘half cursor’ should now 
press START and the Aaplus prograa will do the rest. 
U.K. ATARI COMPUTER OWNERS CLUB 

Chris Barlow, the President of the U.K. Atari 
Computer Owners Club has advised us that their 
membership is open to overseas Atari Enthusiasts. 
They have a current aeabership of sore than 1500 
(WOW!!!) from Europe, Africa, Middle East and the 
U.S.A, They also put out a very high quality, 
quarterly newsletter (currently issue #5) which you 
can receive for 5S Pounds Sterling (about $A7.50) per 
year, including packing and postage. Payaent should 
be in Pounds Sterling made through a Bank Draft or 
International Money Order (from the Post Office), 

Members will also be able to get programs from 
the Club’s software library by sending their own disk 
or cassette along with a ‘fee’ and 50 pence to cover 
return postage. If you are interested contact then 
at:~ U.K. ATARI COMPUTER OWNERS CLUB 

P,Q, Box 3, Rayleigh, ESSEX. UK. 

SUPERNON PRINTER INTERFACE 

In Inside Info #15 (October 1984) I did a review 
on a Queensiand product -SUPERMON, A lot of interest 
was shown by our members, especially concerning the 
Monitors ability to redirect the printer buffer 
through the Ataris joystick ports. Unfortunately, 1 
didn't mention that the printer interface would NOT 
work with ALL commercially available prograas, 
There may be no other alternative than to buy another 
printer interface froa overseas, In the meantine, | 
werstand that the price of the 650 Interface has 
sec. reduced by around $100 -making it around $250 
sere Im Australia -if you can get it! >> 





ATARI REPAIRS IN N.S.W. 

At the present time there is a guy from Hong 
Keng by the name of Lawrence Lem (pronounced liab) 
setting up a company called ‘IRASON PTY LTD’. He 
used to work for Atari and can repair any ATARI 
products -but no third party products. If you need 
his services for repair work you can phone hie at 
home on a temporary basis on (02)443-2742, At our 
Deceaber meeting Lawrence will demo a joystick port 
printer interface which works with ANY progras. 

A VISIT FROM ASHTON SCHOLASTIC 

At our last meeting Ashton Scholastic advised 
that they were importing educational software for the 
Atari. They gave a demo of the Powerpad touchtablet 
{known as Chalk Board in the States) and announced a 
price reduction for it, This touchtablet rivals the 
Koala pad and is about four times the size. It used 
to be $169.95 without program but now is $129 with 
either Micro Maestro or Leo's Electric Paintbrush 
cartridges (normally $49.95). & quick check of 
Sydney stores revealed that you might have to press 
to get the new price -s0 don’t be afraid to!! You 
can also buy replacement board overlays at $6 each. 

Other items of Powerpad software are Powerpad 
Frogramming Kit (Disk) $39.95 - Logic Naster, Bear jam 
$59.95 each cart. - Micro Illustrator $49.95 cart. 

Other software is Square Pairs, Turtle Tracks 
$29,95 each - Microzine 1, Colorsaurus $39.95 each - 
Magic Spells $49.95 - Spelidiver, Bannercatch, Agent 
U.S.A. $52.95 each - Bumble Games, Moptown Parade, 
Hoptown Hotel 254.95 each, 

For further information contacts- ASHTRON 
SOFTWARE. PO Box 579, Gosford. 2250, or Phone 
(043) 28-3555, 








TRANIEL STRIKES AGAIN 
Tremail recently visited Hong Kong for 2 days 
and cancelled contracts with 4 companies 
manufacturing Atari products -then he set up his own 
factory. Disk drives, interfaces and cartridges are 








made in Hong Kong. Currently Taiwan is the sajor 
Atari manufacturer but ali of the development and 
design is still carried out by the team in the U.5.A. 

Tremail’s son has now taken over Atari‘s 
European market. A new business machine which 
apparently comes from Japan will be released by Atari 
late in 1985. 

Rumour has it that "The Atari Connection” is 
being redesigned and should be out again in January 
1985 and user group input is allowed. The User Group 
Support is also te be continued with a new progran, 
better communications and improved benefits. [It is, 
after all, free advertising for Atari isn’t it? -Ed.j 

A NEW CHIP 

Anew chip, the 65816, has been developed which 
allows new computers to run older, existing software. 
This chip is a descendant of the 6502 and will also 
function as a powerful {6 bit eicroprocessor with 
vast amounts of memory at very high speed. The chip 
should be available in the States in a few months for 
$US50-100, It ism't known if it can be used as a 
direct replaceeent for the 6502 or if it is Atari 
compatible. 

REVISION C BASIC 

Atari's Customer service has been selling a 
Revision C upgrade for the BASIC cartridge. In the 
States you only need to send $U5i5 (per copy) along 
with your computers model number (400, 800 or 1200) 
and serial number. The information | received was 
written before the Tramiel takeover but I think this 
upgrade should still be available -I'll have to check 
to see if Futuretronics is doing anything about this 
since we Aussies may not be entitled to the clain 
through the service in the States. 





Easy TAB Statement 


by Arthur Banks, 


iTyntynder South, Vic.) 


{EDITOR'S NOTEs- Arthur sent this article to #e way back in March, I’a sorry it’s taken so long to print it! 
This is the last outstanding article I have -so get writing!) 


Often when translating programas from the Apple 

you find statements such as:- 
100 PRINT TAB{i0); "XYZ" 

There is no TAB statement in Atari BASIC, although it 
can be siaulated by POKEing into several memory 
locations. Here is a method which does not use the 
POKE command but will siaulate the AppleSoft line 
given above:- 
10 DIM TABS{{0): TABS="(10 SPACES) "sREM This should be 
done during initialization 
100 PRINT TABS3 "XYZ" 

The method can be generalized as follows:- 
10 DIN TAB$(40): TABS="(40 SPACES) * 
200 FOR L=1 TQ 20 
210 PRINT TABS(E,L) 3 "XYZ" 
220 NEXT L 


This gives a siailar result to an Apple prograe 
along the following lines:- 
200 FOR L=i 10 20 
210 PRINT TABXL); "XYZ" 
220 NEXT L 


The above technique provides a close 


approximation of the Apple TAB statement and thus 
helps in making program translations. It also sakes 
for easier and aore readable programs than does the 
use of POKE commands. 





Diamond Mine 


by Sydney Brown, 
(Program reprinted from Eugene A.C.€. Newsletter, April 1984. Article by Garry Francis. ] 


I first saw this game in one of the arcades in 
George Street (Sydney) about two years ago. It 
wasn't a very well known gane (in fact, I can't even 
remember its name), but one of the blokes from work 
was "addicted" to it. He insisted that I give it a 
go, but I kept getting killed within a few seconds. 
At 20c a go, I soon lost interest. However, now that 


Sydney Brown has translated it for the Atari, ay 
interest has been rekindled, 
adaptation of the original {whatever 
and is extremely well 
tun te play. 


This is a really great 
it was called) 
implemented. The graphics are 


areat and it's In fact, I think it’s 





How To Play: 

The game begins as you land on the surface of an 
asteroid to try and find some diamonds to refuel your 
spacecraft, As it happens, the Snargs own a diamond 
mine here. If you can steal some of the diamonds 
fron the mine, you can use them for fuel. 

There are 9 diamonds to collect, but some are in 
hazardous positions. You'll see what I mean when you 
try to collect them! You don’t have to collect all 
the diamonds (at least not in the early rounds), but 
get as many as you can because they're worth BI6 
points. You get {00 points for the easily accessible 
diamonds, 200 points for the diamonds in the chamber 
with the falling stalactites and 300 points for the 
diamond in the chamber with the drawbridge. 








Use a joystick in Port {to move around. You 
can dig into the soil of the astercid, but you cannot 
dig into rocks or concrete. If you move quick, you 
can dig under a rock before it falls on you, but two 
or more rocks stacked vertically will surely crush 
you. At the end of a round, you get 1 bonus point 
for each chunk of the asteroid that you dug through 
plus 2 bonus points for each rock that fell without 
crushing you. 

Needless to say, the Snargs aren't going to let 
you steal all their diamonds without putting up a 
fight, so they've called out the troops. Your 
spacecraft is hidden behind a mountain, but a Snarg 
tank slowly blows it to bits. When the whole 
mountain is destroyed, the tank will have a clear 
shot at your spacecraft, 50 you must collect the 
diamonds and return to your craft before the Snarg 
tank can blow it up. 

Just to make things more interesting, a second 
player can use a joystick in Port 2 to help the 
Snargs. He controls the mine guard (which is near 
the tank) and his job is merely to catch you, 
However, he cannot dig his own tunnels, He aust rely 
on those already dug. 

Good luck and be careful of those falling rocks, 


ATASCIT aTaseit Necessary 
Humber Character keystrokes 
CHRS (8) * CTRL , 

CHRS (13 fF CTRL a 

CHRS (29) + ESC CTRL = 
CHRS (303 € ESC CIRL + 
CHRS (962 ¢ CTR . 

CHRS (1333 a IRVERSE CIRL E 
CHRS (1453 fi INVERSE CTRL 2 
CHRS £224) G IMVERSE CTRL . 


ATE H,V4l,ZZ:IF ZZ<78 THEN COLOR J:PLOUH=AHt1:COLOR 78:PLOT AH, AV 







1 REN DIAMOND MINE RPT 1,0: U=utl 209 IF K=79 THEN 980 

2 REM 8 by Sydney Brow #1202 IF ST=11 AND HOO THEN LOCATE H-l,U] 210 IF ZZ-88 THEN GOSUB 368 

3 REM & Reprinted from @],ZZ:IF 22478 THEN COLOR J:PLOT H,U:H=Hj 211 IF H=6 AND U=10 AND CY=@ THEN L=3 
4 REM ®@ Eugene &@.C.£. Newsietter 8 | -U 212 IF (H=21 OR H=31) AND V=21 AND CY- 
S REM & April 1984 #1203 IF ST=7 AND H(38 THEN LOCATE HtU,U}Q THEN L=2:CY-Q:£-a 

6 REM & Published by Atari Computer # | ,ZZ:IF ZZ<78 THEN COLOR J:PLOT H,V:H=HI223 COLOR 79:PLOT H,Y:IF EN=L THEN GOS 
7? REM & Enthusiasts (N.5.H.) Bytu UB 350 

8 REM & December 1984 8 1204 SS=STICK(U) SIF PL=1 THEN 210 214 IF H=3 AND V=4 AND UP-U THEN 600 

9 REM 205 IF $5=14 AND AV)2 THEN LOCATE AH,A]22@ IF I-@ AND CN>QT THEN SOUND 0,21,8 
108 J=3Z:O-8:U=L3HS=O:LEV=U:GOSUB 3200] U-U,K:IF K=J THEN COLOR J:PLOT AH, AV:A] ,15:I=1:P=SCRHILO:FOR H=15 TO 8 STEP - 
6 VIAV-LICOLOR 78:PLOT At, AV 1:50UND U,21,8,M: NEXT W:SOUND U,0,8,8 


198 5C-Q;L- 
195 H=3:V=4:EN=08: DIG—O: ROK=-Q:CY-O:E-02: 


U:CN=1:3 1-0: 0T=27-LEV 

200 ST=STICKCO}IIF ST=14 AND U4 THEN 
LOCATE H,V-U,ZZ:1F 22478 THEN COLOR J: 
PLOT M,¥:¥=0-H 

201 IF ST=13 AND U<23 AND LX THEN LOC 


3! 


206 IF 55-13 AND AV(Z3 THEN LOCATE aH, 
AVtH, KS IF K=J THEN COLOR J:PLOT AH,AV: 
UP=O:AH=J4:AV=Z:COLOR 73:PLOT AH, AV:IL=] AV-AVTL:COLOR 78: PLOT AH, AY 

207 IF $5711 AND AH)18 THEN LOCATE AH- 
1,A¥,K:IF K-J THEN COLOR J:PLOT AH,AY: 
AH=AH-LSCOLOR 78:PLOT AH, AV 

208 IF 55=7 QHD ANC33 THEN LOCATE Anti 
AU, KIIF KJ THEN COLOR J:PLOT AH,AV:A 


225 CNICNTLIIF I-08 THEN 288 

238 IF I-i THEN POKE P,8:P=P-%:F=PEEKC 
PI:IPOKE P,43:IF F(34 THEN 250 

235 SOUND U,77,8,15:POKE P,PEEK(P-4@): 
POKE P-40,PEEK{(P-80) :POKE P-86,8 

240 FOR W=15 TO @ STEP -2:SOUND U,77,8 
»WINEXT WSCN=1:I-0:PISCRt110:50UND U,2 
2,2 





»> 


250 If P(SCRES6 THEN POKE P,@:G0TO 899 
288 ON L GOTO 290,498,588 

299 IF (ZZ=76 OR ZZ=77) AND STCD45 THE 
M GOSUB 3e8 

295 LOCATE H,U-U,ZZ:IF ZZ=82 THEN GOSL 
8 318 fe ; 
299 ZZ=255;60]0 200 

3e@ FOR pale STEP 2:SOUND 8,35,8, 
Wi NEXT Hi: soumd 0,0, O:DIG=DIGHU:RETUR 
; ; 

316 ENZUSRHIHSRU=V-UELOCATE RH,RV-U, XX 
TIF 4X=62 THEN COLOR J:PLOT RH,RV-U:CO 
LOR 82:PLOT RH,RUtU:GOTO 908 

319 POKE 77,0: ROK=ROK+U: RETURN 

328 FOR H=3@ TO Q STEP -U:SOUND Q,77,6 
,W2:MEXT W:SOUND 0,0, 0,0: RETURN 

35@ LOCATE RH,RVtH,XK:COLOR J:PLOT RH, 
RUIRVZRVEU: COLOR 82:PLOT RH,RU:IF KH=7 
9 THEN 908 

355 IF RV<23 THEN LOCATE RH,RVtH,X4!IF 
HX=J OR HK=79 THEN 350 

359 EN=Q:60TO 3208 

36@ COLOR J:PLOT H,V:LOCATE H-U,¥,Z1:1 
F 21=8@ THEN H=H-U:G0TO 365 

362 LOCATE H4U,U,Zi:IF Z1=8@ THEN H=H+ 
U:GOTO 365 

363 LOCATE #,V-U,Z1:IF Z1=80 THEN V=U- 
U:GOTO 365 

36a Y=UtH 

365 COLOR 79:PLOT H,V:FOR HHL TO L:FO 

R W=3G TO O STEP -:S0UND 0,7,16,W/2:N 

EXT WiSC=SC#18Q:POSITION 6,0:2 SC:NEKT 
wa 

366 IF L=3 THEM UP=1 

369 RETURN 

408 CY=SCY+isIF CY)4 THEN CY=Z:R=INT (RM 

DCQIHLLP4FZLSLOCATE R,20,Z2Z:E=0:1F ZZ=8 
1 THEN E=U 

405 IF CY=2 AND E=-) THEN FOR W=14 TO 0 
STEP -2:50UND 0,7,18,W:NEXT W 

410 IF E=U THEN SPICY#i9:COLOR J:PLOT 

R, SP-UILOCATE R,5P,ZZ:COLOR S1:PLOT R, 

$P 

416 IF CY=4 AND E= THEN GOSUB 308 

450 IF ZZ=79 THEN 998 

460 IF CH(21 OR HSL) AND CY=4 THEN L= 
U:cY=o:E=0 

499 ZZ=255:G0T0 299 

500 IF CY=Q THEN COLOR 204:PLOT 7,¥:R= 
IMT (RND (0) %6) +: COLOR J:PLOT R,9:CY=u 
505 IF ¥=8 THEN COLOR 204:PLOT R, 9:L=u 
TCOLOR GLIIFOR W=U TO G:PLOT W, 1: NEXT 
WICOLOR J:PLOT 7,10:CY=0:G0TO 299 

518 CY=CYtU:IF CY)1@ AND CY(17 THER CO 
LOR J:PLOT 17-CY, 11 

515 IF 17-CY<(H AND U=18 THEN S5@ 

S49 GOTO 299 

559 COLOR J:PLOT H,Y:COLOR 79:PLOT H,V 
+U:FOR HEU TO 3S:NEXT WICOLOR J:PLOT H 
,VtUb:GOTO 980 

680 COLOR 32:PLOT 3,4:COLOR 79:PLOT 3, 
3 

605 SOUND U,0,0,0:FOR W=258 TO 38 STEP 
-10:FOR HHZW TO W-25 STEP -1:S50UND 0, 
W410, 20: NEXT MWINEXT W 

618 POSITION 2,1:? SHS;:POSITION 2,3:? 
“  “SsFOR W=3@ TO 5 STEP -1:SOUND Q, 
H,10,10:8ExT WH 

628 POSITION 2,1:2 SH$(1@,12) :POSITION 
2,2:7 " “3:FOR He3@ TO 5 STEP -1:50 


UND Q,H,18,10:NEXT W 

630 POSITION 2,1:7 " ";:FOR WH=15 TO 
@ STEP -1:FOR K-30 TO 5S STEP -1:SOUMD 
0,H,20,WH:NEXT WiNEXT WH 

658 GOSUB 958 

699 LEU=LEV+1:G0TO 949 

808 FOR Hi TO 35:POSITION 2,2:7 SHS;: 

SOUND Ul, PEEK (53778), 8,15:POSITION 2,2: 

“;:POSITION 2,3:7 “j:NEXT 

818 FOR WH1S TO @ STEP -@.5:50UND U,PE 

EK(53770) ,8,H:NEXT H:GOTO 968 

899 GOTO 899 

908 SOUND U,0,0,0:G0SUB 32@:G05UB 328: 

GOSUB 95@:K=8 

918 POSITION 12,0:7 "GH F 

a 

940 IF PEEK(53279)()6 THEN POKE 709, IN 

T(RND (03 *15)*16418:60T0 948 

948 SC=0:LEV=U 

949 POSITION @,2:7 " 
";:G0SUB 32108:G0TO 195 

958 POSITION 22,0:7 “LM “;DIG;" “IFO 

R Wil TO DIG:FOR WH=15 TO @ STEP -2:50 

UND 0,7,10,WWINEXT WH:SC=SC+U: POSITION 
6,0 

955 27 SC:MEXT W:POSITION 22,0:2 "8"; 

ROK; “:FOR Hol TO 77:NEXT W 

960 IF ROK)O THEN FOR Wl! TO ROK:FOR 

W=15 TO @ STEP -U:SOUND @,21,18,WH:NEX 
T WA:SC=SC+2:POSITION 6,0:2 SCINEKT W 

965 POSITION 22,0:7 " ";:SOUND a 
», 0,0: RETURN 

32800 DIM PRS (50), SHS (13) :CB=PEEK (186) 

~4:POKE 106, CB:PRS(U, 41)="hhelhabhe 

PaLesh'L Vil NHPy FM fOhdT Pp Dw 

32816 GRAPHICS 0:Z=CBX256:A=USR (ADR (PR 

$),Z,4):FOR HEZ+128 TO Z#207:READ D:PO 

KE W,DINEXT WiSHS="URK seeeeyaZ * 

32015 FOR W=Z+272 YO Z+511:READ D:POKE 
W,D:POKE W,DINEXT W:POKE 752,U:FOR KE 

4536 TO 1551:READ D:POKE H,D:NEXT H 

32028 POKE 756, CB:DL=PEEK (560) +256*PEE 

K(561) :POKE DL+3,69:FOR K=6 TO 28:POKE 
WHOL, 4: NEXT KiPOKE OL+8,132 

32100 POKE 768,54:POSITION Q,0:2 “BCDE 

Fe ut 3"; 
SPOKE Z-11,4:POKE 740,24:POKE 709,14 

32110 POKE 712,428:POSITION 18,U:7 “SL 

MT A_  USML"; :POKE 512, @:POKE 
513, 6:POKE 54286,192 

32120 POSITION 15,2:7 “SLMLMLMT 

IX] SLMLM; :POSITION 14,322 “SLMLALML 

MT = SLMLMLMLWL"'; :POSITION 6,0:7 SC 


0 


FIJ 


Oe a 


. 
’ 


32138 FOR H=4 TO 22:POSITION Q,W:? “LH 
PSL ISL PIL POL Pit ADSL OS Ae id 
“SIMEXT HiCOLOR 76:FOR K=O TO 38 

32148 PLOT H,23: NEXT WIPOKE Z-U,44:5CR 
=PEEK (DL+4) 256*PEEK (DL+5) 

32158 COLOR 264:PLOT 28,23:DRAWTO 28,1 
9:DRAHTO J,19:DRAWTO J,23:COLOR J:FOR 
H=21 TO JL:FOR ¥=20 TO 23:PLOT H,Y 
32169 MEXT Y:NEXT X:PLOT 20,21:PLOT J, 
2L:POSITION 21,20:7 “Qgnonenoaae; :P0S 
IVION 21,23:7 "PUP EP "; 

32178 POSITION 0,9:2 “QVM; :Posit 
Tom @,18:? “> sPOSITION Q,11:7 


32188 GOSUB 32408: WR=49+7HLEV:GOSUB 32 


32 


See 
323@@ FOR W-11 TO 2 STEP -u:POSITION WH 
»U:? SHS!FOR MHEU TO 24:SOUMD 0,31¢+WH, 
18,6:NEXT WA:NEXT MiPOSITION 2,U:7 * 
a 
32318 POSITION 2,2:7 SHS;:FOR HHL TO 
21:50UNb 0,31+WH,10,6:NEXT WHIFOR W240 
TO 160 STEP 10:FOR WHEW 70 21 
32320 SOUND 0,H+WH,10,6:NEXT WAINEXT W 
'SOUMD 0,0,0,0:COLOR J:FOR Hou TO 21:6 
EXT WIPLOT 3,3:POSITION 3,4:7 “iP; 
32399 RETURN 
32408 COLOR J:PLOT 3,2@:DRAWTO 3,14:0R 
AWTO 27,14:DRAWTO 27,12:DRAWTO 38,12:0 
RAWTO 38,22:PLOT 17,4:DRAWTO 17,14 
32418 DRAWTO 26,14:DRAHTO 26,17:PLOT 3 
1,4:DRAHTO 34,4:DRAWTO 34,12:PLOT 34,3 
32428 COLOR GO:PLOT 3,20:PLOT 17,4:PLO 
T 34,4:PLOT 26,17:PLOT 38,22:PLOT 0,10 
TRETURN 
32508 COLOR 82:FOR Wl TO WR 
32518 MINT CRND(D)¥39) :YINT CRND CD) #19 
DHA LOCATE X,¥,ZZ:0F ZZ0>75 AND ZZ<}77 
THEN 32510 
32515 IF K<(9 AND Y(12 THEN 32518 
32520 PLOT X,Y:NEXT W:RETURN 
32699 RETURN 
32700 DATA 32,136,136,136,136,136,136, 
32,32,160,32,32,32,32,32, 168 
32781 DATA 32,136,8,8,32, 32,128,168, 32 
,136,8,32,8,8,136,32 
32702 DATA 136,136,136,136,168,8,8,8,1 
68,128,128,168,8,8,136,32 
32703 DATA 32,136,128,168,136,136,136, 
32,168,8,8,32,32,128,128,128 
32784 DATA 32,136,136,32,136,136,136,3 
2,32,136,136,136,48,8,136,32 
32718 DATA 48,130,128,40,2,2,138,40,8, 
0,8,34,32,32,34,8 
32711 DATA O,8,8,34,34,34,34,8,0,8,8,3 
4,34,32,32,32 
32712 DATA U,0,8,34,42,32, 34,8, 168,32, 
32,32,32,32,32,32 
32713 DATA 128,128,166,136, 136,136,136 
»136,0,0,32,136,136,136,136,136 
32714 DATA 8,8, 40,136,136,136,136, 40,8 
»@,32,170,178,32,8,8 
32728 DATA 255,255,255, 207, 255,255,259 
1243, 255,63,255,255,255, 243,259,255 
32721 DATA 40,158, 48,20,85,65,65,65,28 
, 485,20, 28,150,158,138,138 
32722 DATA 0,0,8,0,32,168,168,32,178,1 
70,42,42,8,8,8,8 
32723 CATA 16,84,84,85,69,85,21,20,3,3 
,15,15,63,63,255,243 
32724 DATA 192,192, 48,240, 252,252,243, 
255,0,0,0,0,12, 608,207,255 
32730 DATA 2,2,9,10,38,37,170,178,178, 
178,255, 40,40, 255,170,178 
32731 DATA 126,128,96,160,152,88,176,1 
78,85,107,27,27,5,5,1,1 
32732 DATH 85,105,108,108,80,80,64,64, 
@,10,42,166,149,166,42,10 
32733 DATA 138,170,178,102,85, 102,178, 
170,8,168,179,192,86,102,170, 168 
32734 DATA 9,0,128,178,174,128,0,0,0,4 
8,158,138,158, 138,178,136 
32748 DATA 72,173,18,218,9,12,141,23,2 


68,169, 8,141,26, 208,104,646 


BASIC XL 


technical data 





DESCRIPTION: 
BASIC XL is a compatible extension to Atari 
BASIC that adds dozens of new commands 
and functions. 


REQUIRES: 
BASIC XL requires no previous pro- 
gramming experience and will work with 
any Atari Home Computer with at least 16K 
of memory. 


OPERATING SYSTEM REQUIREMENTS: 
BASIC XL will work with any DOS that 
supports the Atari Home Computer. Or use 
cassette alone. 


SUMMARY OF NEW FEATURES: 
@ Player/Missile Graphics 
® String Handling 
@ Input/Output 
e Program Control 
® Program Development 
@ Special System Options 


PRODUCT MEDIUM: 
BASIC XL comes to you in the specially 
designed, memory-saving OSS 
SuperCartridge. 


PACKAGING: 
BASIC XL comes complete with over 300 
pages of documentation, which includes both 
a tutorial and reference manual, in a handy 
sized binder. 


AVAILABLE: 
Through your local dealer or distributor. 


PRICE: 
CARTRIDGE ..... wee 09 Ly 
Lew WY. cet? 

g.S 5 30 : gece ur sect 
0 Lae oe 41 

co WE Oe as 

ete ast” plo! 1924 
mee” got ~ (Or) cae 
C. or (o*) a 


BASIC XL is a 16K cartridge that occupies only 8K of your 
valuable RAM. It is LOAD compatible with Atari BASIC, and 
supports all Atari BASIC commands. 


Player/Missile Graphics Support: 
@ Commands include, PMCOLOR, PMMOVE, 
PMGRAPHICS, PMWIDTH, and MISSILE 
e Ability to efficiently MOVE a large player vertically with 
a single command 
e Detect collisions with the specially designed 
BUMP command 


String Handling Capabilities: 
e@ Support of String Arrays 
© String functions include: LEFT$, RIGHT$, and MID$ 
® Use the FIND command to locate characters within 
a string 


Comprehensive Input/Output: 

@ Handles DOS commands like DIR, PROTECT, ERASE, 
and RENAME right from BASIC XL 

e Uses the RGET and RPUT commands to do record I/O 

® Supports a PRINT USING command for sophisticated 
output formatting 

@ Manipulates data blocks from a device or file with the 
BPUT or BGET commands 

e Utilizes the TAB function to make column printing easier 


Additional Features: 
@ Better program control with statements like 
IF..ELSE...ENDIF, and WHILE..ENDWHILE 
@ Move bytes around at assembly language speed with 
BASIC XL’s MOVE command 


Special Program Development Commands: 

@ Use the NUM command to enable BASIC XL’s automatic 
line numbering 

@ Run lengthy programs 2 to 4 times faster with BASIC XL’s 
specially designed FAST mode 

@ Make debugging easier with the TRACE/TRACEOFF 
commands 

@ Get a cross-reference all program variables in use with the 
LVAR command. 


Special System Options: 
@ Get the status of your system with the SYS command 
@ Catch run-time errors and lines using the ERR function 
e@ Look and change two bytes instead of one with DPEEK 
and DPOKE 
@ Get the hexadecimal equivalent of decimal numbers with 
HEX$ function 


EE | 


OSS WRITES 
ONLY PRECISION SOFTWARE. - 
OUR CUSTOMERS 
WRITE OUR BEST ADS! 


BASIC XL 


“BASIC XL is a fast and powerful extension of Atari BASIC, totally compatible with virtually all 
software. Its many features make programming easy, especially games that require player/missile 
graphics. For people writing business software or translating existing programs from other com- 
puters, the new string arrays and other string-handling features make the task manageable. 
BASIC XL is a truly professional language that should become standard in all future Atari com- 
puters. Overall Rating—A.” The Addison-Wesley Book of Atari Software 1984 

BASIC XL SuperCartridge & Manual (Requires 16K Memory) .........0.0ec0eeeees $99.00 


ACTION! 


“For those who have found BASIC to be too slow or assembler to difficult, ACTION! is the logical al- 
ternative. ACTION! programs can increase speed from 50 to 200 times that of BASIC.” Jerry White, 
Antic, February 1984 

ACTION! SuperCartridge & Manual (Requires 16K Memory) ..........00.2ceeeeeee $99.00 


MAC/65 


“For the serious machine language programmer or anyone interested in programming in 6502 
machine language, this package is a must. A lot of the good professional software on the market, 
games or otherwise, was written using this brute. Coding machine language with anything else is 
like trying to swim upstream in quicksand.” ACE Of West Hartford, May 1984 

MAC/65 SuperCartridge & Manual (Requires 16K Memory) .........000eccseneeoes $99.00 


THE WRITER’S TOOL was designed 
for WRITERS who want to WRITE! 


When you want to write on your Atari® Computer—a letter, a business report, or a bbok—you want 
to concentrate on writing and not on the word processor that you are using. 

You want to write immediately without having to spend hours learning some fancy system or 
remembering complicated commands. 

You want to write quickly...as fast as your imagination can fly. Then edit just as fast...correct mis- 
takes; change, add, or delete words and phrases; rearrange the sequence of paragraphs or entire 
pages without fearing that one slip of your fingers might wipe-out hours of precious work. 
You want to be able to save or retrieve your text files on any type of Atari compatible disk drive 
using either single-density or double-density disks without worrying about accidentally erasing 
files. 

You want to be able to print out your finished piece right away, using all of your printer’s 
capabilities such as Pica, Elite, and condensed type; print two-columns on 82” wide paper and 
proportional spacing; and print different types of characters: double-width, bold- 
face, italics, underlined, “°° and ,upscript: 

Compare THE WRITER’S TOOL with the others: feature for feature, dollar for dollar—if you can 
find a better word processor, buy it! 

THE WRITER’S TOOL* 

SuperCartridge, Program Disk, Tutorial & Reference Manual ................. $129.95 
*Requires an Atari® Computer with 40K memory, disk drive, and any 
Atari compatible printer. 

ATARI? is the registered trademark of ATARI, INC. 


Now Available At Your Software Dealer! 








Optimized Systems Software, Inc. 


1221B Kentwood Avenue, San Jose, California 95129 (408) 446-3099 


